(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    312923,       6105]
NotebookOptionsPosition[    307693,       6011]
NotebookOutlinePosition[    308066,       6027]
CellTagsIndexPosition[    308023,       6024]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[{
 RowBox[{
  RowBox[{"th", " ", "=", " ", "0.005"}], ";", " ", 
  RowBox[{"index", "  ", "=", " ", "9"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"Plot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"PointSize", "[", "th", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListLogPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"PointSize", "[", "th", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListLinePlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ParametricPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}]}], "Input",
 CellChangeTimes->{3.8090006797393723`*^9, 3.8090820270712786`*^9},
 CellLabel->"In[1]:=",ExpressionUUID->"899327f2-1723-4931-90a1-8a258c71e76a"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"d", " ", "=", " ", "1"}], ";", " ", 
  RowBox[{"L", " ", "=", "4"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Plot", "[", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"Cos", "[", 
     RowBox[{
      RowBox[{"ArcTan", "[", 
       FractionBox[
        RowBox[{"d", " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", "\[Kappa]x"}], ")"}]}], "L"], "]"}], " ", "-", 
      RowBox[{"ArcTan", "[", 
       FractionBox["d", "L"], "]"}]}], "]"}], 
    RowBox[{"-", "1"}]], ",", " ", 
   RowBox[{"{", 
    RowBox[{"\[Kappa]x", ",", " ", "0.0", ",", "1.2"}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8089939476374364`*^9, 3.8089940771618567`*^9}, {
   3.80899415632673*^9, 3.8089941801551065`*^9}, {3.808994217103107*^9, 
   3.808994235507683*^9}, {3.8089942754950867`*^9, 3.80899436290751*^9}, {
   3.808999250239683*^9, 3.808999282250427*^9}, 3.809000754255245*^9, {
   3.8090012843332987`*^9, 3.809001284526802*^9}},
 CellLabel->"In[2]:=",ExpressionUUID->"8c933468-b6be-4d3e-b87e-4272fbea92e6"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
      1.], LineBox[CompressedData["
1:eJwd1Xk0lfkfB3CyVDfJNvYhZMmIxCRFb4WasuXSxkxKbj+6VLbUlHQRGmWk
cHOzRMWVbKGUyMgkUw1hULaMLVSPe1Fjupnv83vOec5zXuc8f3y27+er43uU
yVogJiaWSV76K+xXNqtw8too9v+HQmaM9nIZ7XVQLRUXp31U/15Cp9YPOJQn
LUk7waHkrJIKE41Nsotp75ldYPtIaw8Ul6nL0TYq2PUPy2AfTFhGarS/mHR4
LVTxxWS19QraQ1Lz99+os2D2xcWc9os+I5VSLX+0qrPsaFfdY4bH6rJRLBnl
Tjsr+XTbHoMjyC3g+dFusGzjKqceQ/zMg5O0rXTGnoqphMD6dU8y7dtLRbPj
3FCkOIoX0taekzfoUA9HkIFRI+2FbRti+VonoCwZSRKkcLpux93LOSeR3leo
S5u6zRqM1D0FifHXjrS7Yn+1YxqcgbTbphTazsE3jtoURMEtLuIh7YHiH90U
U8/iHb9khLYnL/iMSDkaEcH69guIk+S/pAo6o6Ep9A2j3RQfd2eUG4Nwzdx8
2jZhvJ5W9XPI19FXkiBe4dK4/pZWAm58YyMlSbyvwY3J60/AxenYLbS51q8D
knPOY2zq5XnaMgYfuT/rJmKHxCFlKeLpr6qfXA2S4J2TtVWa2DQ8T9ZhNAlO
KR+4tP0nVhlYF/wKHzVM0v7Avl4on5qMbblvuQuJffdUdf+rnIIjtcaMxcRR
l0+xjkek4PmJSDbtay/tpqjOFExvbHlJ+y+HPxaNcC9DyA/nMYi3mw9Ytain
okWt1lmG2ILBSLuhxQVv79plcnT8CW/zbOK56LI8yaP9Rbq6rP0jFzUZSsby
xE8k/F9I1l/FULGnqwJdT1GjJOsgDxmXP5UrEYdRnFD9giys0K+cVKP7c2Qv
55FcNkSHjmep0/V8v/rXnSezId+RxNQgXjBztGOzfg6c+57UaxI3T2lNhczm
IB72NdrE3hOnjdq4uXCTO65jQPer0N9M+0UuvFuyP9N+HOC5li2eB9FP2q8M
6f6MfecgcTgPO37RvrCSeHLotY/Fhhtwr9fRXEXPU9+69Mu9N/HwhHqRJV2v
1mkpT10+wjj2iY7EsdfXdBt58HFjvurqFuLA4GNFohg+8lzMC7cS28pPMvOH
+UiTX9+6jbhvx9/ZcwWFGHbIsHKl57ml1fq6WRGiKs+xdhPnviwO+mBTgjRu
oiOb+JesSbuGoBIYHam6EkgcesRYiZtVAr/O4eEgYt2FHr3LxUrh9C0z6Rix
4NbLmOYDpRjg7PsUTpwy0tjyrX4ZxKWtjDnE7ayKw09ul0NQGqBwlXi2K2Nd
RUM5Rm8bZWQQqzhzpG+8Kcciib/0rhF7rXHNjVlyF+7R/9pkE/d/He3ezL4L
9uTRuJvE4+ka2+qNKzDN/xheTizWHG1Yy6/E42vtv7+g47MNmLlTX4lg/40X
/iS2L3VryOyuxOKwKx6txHFpmj6Ri6uwd6HUWDvxkoNVaTYBVTjlOGvYQ6z8
5Z3UQ6N7cNzNkJwgXmXqPnQv/z62x0WbMMQpLF9To1BSfx9IlPGWIVZaa7jp
1pv7GHfuTJQlnrMVZV5ZVo2lpabTCsS/u/B3B0dUY+3VwX4N4v1B4n8Yb32A
YUVnPVPilKKyssyRh8hNSNrrSTxrrBAVo1+HwC6VqHxiB6tbinW2dbggt0G2
kP7ffn3B3M469Lxzyy4iNv3RtzU4rg511q5Py4j/d7Fcb/9oHcJ8eaY1xJMR
K/2yPB9j03F/r1bifa+fLTqlXI/v0pkGIuJN2QymZcZvEPx9MdFrAQU7e62Z
lMFGeOwUPwgJCmPOejpZGs8weEBuarMk6feBbQprv32OhImGcQ8pCpaXxJUe
+PyJXBV/h0xpCu9ZQUGs71ux4Ofqxx8XkvpUMb9xuPsK+h4T+/csJvtekdPI
dW9HoplxxjyDgsssuizaO1CZMrWmQIbEN7JV6BDRCbfE1KgrsiT/803MIoVu
XC9rHkmXo/CmrFvJK+U1ZtRFU1cUyHkbteiPXNODpeyT5W+USHy5WjJjVb3w
OXtZTVWFQgibuanJux9+65pl8tQoHAyN+inq9AD0I9yG7DQpDAsz/7C1fYts
h+qZ51oUZuYGbK1kB5GepWx3R4ecH4fAtx6tg5jSdfwYsYKC+ZhFPi/5b9Tk
V3e6GFJQUFgerLV/CMYWa5iRxhSen/EMfKIzjOLQROfkVST/kDvsm8Jh1Iia
bMTNyTzUbr5YVj+C8nOqGmcsKbi7Lh8Y4IyiONM5t9OKwmE/XSsn5hhm9H6y
u7KB7JdHgXVdSu8gPHB+fiUo3DsqDLjU9g7+tS7XnmymcL0gS/Vc7jgOnO3W
fbqF5Lci5TPv4ATmltQcv7adwl2Dwp73lpOo3JxW2OtKoYfNEPh+nkRv9xbn
D0xyPzPyV0rcf4/C/l5vsd0Uks38WX3xH+AXuL4t2pvsg/TgVz3bPuLaiWVl
L30oMBr+1FlC+jI6eqkkyY+C5Ggs2zacQsYxKd6OABK/SZ8Lp4PCIdmaTx1B
5HxXbisftJ2C2j91v7eFUFjts7dkZ/YU+F0XhJciKHz9Pt627+sUaleyh51O
U1Dc8dQl9pAAIZxNu6I5FFITb89ueCpAvdmewtA4Cmf3xbRNNAngrcAYO098
2Ny7lNcsQJjTesMc4o2djMP/vhCAwf6m8DnxmO7h3gftAiyWqqjXj6ew/oHR
E+tBAfgtUeu6iPvGbl6yEglw/4eH9hvPk/v1YeSR0a8CDLnJlnkSlyftdEoX
E+I3UY82mzjeUkrqk4QQdZ8mxbnEq8/6nahiCGEi09E5RRytoufzvaoQstPl
zTd/Ift5fG7DsJoQ0nur3GqIdz16pZqqIUTZUsu/XhF/dzD61bSWECFyWaPz
xO3Fbx0r9IXQWGGs6ZVIoZZTretnKIRqiajoGDHf89K84kohovu2I574zJxd
daiJEFId7v4VxP4vVNP0TIXwDF4y30zMzKFC2syEOP3jxvS3xDahTW4x5kKo
c8ZXfyY23JJjYmEhxLNny57LXqDwH3nZnEE=
       "]]},
     Annotation[#, "Charting`Private`Tag$2504#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 1.},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0., 1.2}, {1., 1.0341937991293995`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8089940700300264`*^9, 3.808994077901514*^9}, 
   3.80899415917999*^9, {3.808994218416403*^9, 3.808994235754046*^9}, {
   3.8089942860820293`*^9, 3.8089943633962*^9}, {3.8089992505129523`*^9, 
   3.8089992824853315`*^9}, {3.809000673258481*^9, 3.809000681527027*^9}, 
   3.8090007553173637`*^9, 3.809001286449209*^9, 3.813997658495368*^9},
 CellLabel->"Out[3]=",ExpressionUUID->"fda08c05-72ac-46c7-88ed-ab8555e048a8"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"d", " ", "=", " ", "1"}], ";", " ", 
    RowBox[{"L", " ", "=", "4"}], ";", " ", 
    RowBox[{"\[Kappa]x", " ", "=", " ", "1"}], ";"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Sin", "[", 
     RowBox[{
      FractionBox["Pi", "2"], " ", "+", " ", 
      RowBox[{"ArcTan", "[", 
       RowBox[{
        FractionBox["d", "L"], " ", 
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", "\[Kappa]x"}], ")"}]}], "]"}], " ", "-", 
      " ", 
      RowBox[{"ArcTan", "[", 
       FractionBox["d", "L"], "]"}]}], "]"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"d", ",", " ", "L", ",", " ", "\[Kappa]x"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.8089940930041075`*^9, 3.808994150564212*^9}, 
   3.808994184993525*^9},
 CellLabel->"In[16]:=",ExpressionUUID->"15c2221c-3352-468d-908c-112f1e569edf"],

Cell[CellGroupData[{

Cell[BoxData[
 SuperscriptBox[
  RowBox[{"Cos", "[", 
   RowBox[{
    RowBox[{"ArcTan", "[", 
     FractionBox["d", "L"], "]"}], "-", 
    RowBox[{"ArcTan", "[", 
     FractionBox[
      RowBox[{"d", " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Kappa]x"}], ")"}]}], "L"], "]"}]}], "]"}], 
  RowBox[{"-", "1"}]]], "Input",
 CellChangeTimes->{{3.8089942087225237`*^9, 3.808994209755401*^9}},
 CellLabel->"In[65]:=",ExpressionUUID->"58836e45-899d-4a5e-93c4-4c77bb38dbc5"],

Cell[BoxData[
 RowBox[{"Sec", "[", 
  RowBox[{
   RowBox[{"ArcTan", "[", 
    FractionBox["1", "4"], "]"}], "-", 
   RowBox[{"ArcTan", "[", 
    FractionBox[
     RowBox[{"1", "+", "\[Kappa]x"}], "4"], "]"}]}], "]"}]], "Output",
 CellChangeTimes->{3.809000723794417*^9},
 CellLabel->"Out[65]=",ExpressionUUID->"c8819249-8a7f-4a27-b1d3-939b6344e4c7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      FractionBox[
       RowBox[{"Sqrt", "[", 
        RowBox[{"1", " ", "+", " ", 
         SuperscriptBox["w", "2"]}], "]"}], "4"], 
      RowBox[{"Sin", "[", 
       RowBox[{"2", " ", 
        RowBox[{"ArcTan", "[", 
         FractionBox["1", "w"], "]"}]}], "]"}]}], ")"}], 
    RowBox[{"-", "1"}]], ",", " ", 
   RowBox[{"{", 
    RowBox[{"w", ",", "0.5", ",", "3"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8090764970466948`*^9, 3.80907658446033*^9}, {
   3.809076660382327*^9, 3.809076679097307*^9}, {3.8090776396154804`*^9, 
   3.809077651261342*^9}, {3.8090797097510324`*^9, 3.809079712652276*^9}, {
   3.8090813858651*^9, 3.8090814260227623`*^9}, 3.8090828306864214`*^9, {
   3.8090828949107423`*^9, 3.80908289560987*^9}},
 CellLabel->
  "In[393]:=",ExpressionUUID->"32734641-0080-4d55-94df-7b8fd0068cd3"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 1], Thickness[0.005], Opacity[1.], 
      LineBox[CompressedData["
1:eJwV0nk41HkcB/Dfbw4/iTGTJyWKsS05ErpU1vdD2ly5IiWrEknW0USOji09
pGWkFQ0SOTooV6R4kqscZcqR9TgyDFKtiWHcO/a3f7yf9/P69/282V5Bzj4U
DMOOkPm/ZYy8VTFMgBoV114LE7Jgm2zHaisZAeqdUq7o7WfByQFzZqK8AM2k
+r+27GZBDVedrqEiQNEvFHf83MqCyG89ImQsQD+05NTUK1jwI8ep7g9vASos
5Y1PxrGgWxn5LTcJEO/9DY7IhAWPl1QqpLcGUbaFsZNxJhMSjhSIW3mDKNBW
5GKexoSQ56YGGZmDqMQqKt0lmQlmwcfy9jwdRJde0vuvxzGhXZibFN40iHQf
TOdphDNhqWVLsFg6iDTZcvJrnJngkLpPZ9R/CInY4bEzskyQbD+b3rpPiNa0
mL5hUxXBwyLDScdOiBI5+fHZiwxosG8mop2F6Mqk+/dN0wy47csOMT0mRDJn
+W6/jjDAOLXNriBciEaa8xzqGxkQuGQkjS0QIsXNhmM1XAaM1YmPW7KG0bY+
j+S89QzocQjRquobRtfyPSYxOwU4GtFi8tR/FM1fU9DTH1oJ0cy6pCC1MXTS
Zf+OhBQ5sIr1SXYs/oru0+qalxNWQGlA/gB+6jvSGLfG+1Nl4aWXRUmF0jg6
P5kgqWohwN0kRic+V4SUH4Z12mgS0PZqeyhPbwJVM8v+NI6SgVoH6abImQm0
Z3/P1iwpHa74BWt4vppEDbWH8NE4Oijt3mqqmyxGz4u5LmvW00G8YFsQ7TmF
jNaxLWtraJDHKTdrNplGi9OMC4q+NNDmNK1WVJSgP7y43hpraSA5YQTDXRIU
GzHmnP6JCndkvyfcL5pB041jEaa3qRCduWAoiphFMvYmqzs9qLB/3H1W03UO
Bbh1TehrUaG7zht3159H8q7d/EMSCpTHNnhqSOaR+sHFyLR3FDhFDxXw+Quo
aN3ZYVY2BU5yLpTLpy2iAvNzdP/LFNjiq8e3O7GE2Pj5IBVPCnxYpb8ydNe/
yLVp6GvJLxSoKoxK16dKkfxmt9/L2RS4gOs6vu+XIq8vj214dArI9UVaBZYt
I89Tmxpl/sHhXAezxcEMg8racOj4hIPtbfmovnwMLqoGGXi9xsH6wDOhIROH
2PjKVV0FOBi0GPjGnMPhY6+NjSAVh0vZ7UsOAzh0pAR4Zl7HQcxhmw7upUAl
y13lURgObfd43NFiCsT5jRud8cWhq64y9pkyFY5/3lmvdwSH+vySvKuRVEi/
l7ECt8NhnehjZ/0oFV5PO6vHm+FwRyf9aastDQ77MzPKjHG4XMPl2b6kwcU3
nCyeFg52qq55LRvp8Pm3wDIvVRwgsPEo6wYdPPm9xy6xcLin5rXxvYQOLzh3
zV0IHH6qf5hif1QG9NhKvm5SDG5urtNtr5aBjQPx9rMSDHymaG3NugQ8pOx+
5TqOwYkSscaNmwTsVOh3LxzB4EzUwSWbWwTMVofRuKRDDpb9LZ9EQPCUZbk/
6RhJaEJiCgF/PQnU1yH9ZNf84p0MAqyxt8G5wxjM1S53PSgggJZU5XBXiEFi
uzy3oZGAQu2cw7cGMUjLCTgd00yAx6Os4WDSOSH8vVbvCHC2TgxzJP1cOXHh
HZ+AaYZZqSLpPnel0x2fCMiqvxuZIMBAW6iyd0hIQNGXElfuAAaGZZEbckcI
4IlGHQJI747unff5QsCLCZHjAdJ22hnFX78RoLY92FeBNMdfY8PkJAFVKyij
3M/kD0yvzpdOEdBjmKocSDpaYagzRELug08fsCfNK8qJm5sjYA9t/CODdPYV
mm/lAgE5ftfVfvRjUODkY3FxidxroD/wA+kyzbfrzaQElESJGotIV09pzS8v
EyAOqNBOJP0fbiKBQA==
       "]]},
     Annotation[#, "Charting`Private`Tag$21185#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{337.69230769230836`, Automatic},
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8090765617829905`*^9, 3.8090765848682394`*^9}, 
   3.8090766797974424`*^9, {3.8090776462238393`*^9, 3.809077651846777*^9}, 
   3.809079713372319*^9, {3.809081386499404*^9, 3.809081426628134*^9}, 
   3.8090818926715393`*^9, 3.8090820302298*^9, 3.8090828959379773`*^9},
 CellLabel->
  "Out[393]=",ExpressionUUID->"3881b1da-cb68-4f4f-af04-84d28361e46b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"DensityPlot", "[", 
  RowBox[{
   RowBox[{"Sqrt", "[", 
    FractionBox[
     RowBox[{"1", " ", "+", " ", 
      SuperscriptBox["w", "2"]}], 
     RowBox[{"1", " ", "+", " ", 
      FractionBox["1", 
       SuperscriptBox["d", "2"]]}]], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"w", ",", "0", ",", "1.2"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"d", ",", "0", ",", "2"}], "}"}], ",", 
   RowBox[{"ColorFunction", "\[Rule]", "\"\<SunsetColors\>\""}], ",", 
   RowBox[{"PlotLegends", "\[Rule]", "Automatic"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.809086615716979*^9, 3.8090866212110586`*^9}, {
  3.8090866746333847`*^9, 3.8090867338463297`*^9}},
 CellLabel->"In[14]:=",ExpressionUUID->"c374a3d5-e636-4e6b-9a79-bd43b66be6be"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{
     GraphicsComplexBox[CompressedData["
1:eJxl17FqVEEYhuHFxitQqxSiXcpY2exoI3bqDQQEKxErr8AunYHcQECwCyzE
UkSYXoacQqMgI4og6OwqYhR33T173k/+z2UlPPlzZs/rhHDm/O37t+6cGo1G
J8t/q6/+Ors9PbM9PRxHZ/nG6QfL90ubd/Kbp/eOl2/5Zv/z7+RLW6vXe/lc
f/0H+dfOwc+dg0/y2369z/Lzuvmsbn6x9Zt8dePoysbRVO4/buubzGv34vXl
+8WY3ugs0xvnnUwvphfTi+nF9GJ6Mb1x/SbTi+nFsbdYb7HeYr3Feov1Fust
1lust1hvsd5ivcV6i/UW6y3qPR7uk97oLNMb551ML6YX04vpxfRiejG9cf0m
04vpxXF/q+1vtf2ttr/V9rfa/lbb32r7W21/q+1vtf2ttr/V9rfa/lbb36re
9W1+VG90lumN806mF9OL6cX0YnoxvZjeuH6T6cX0YnpfD+vSG51leuO8k+nF
9GJ6Mb2YXkwvpjeu32R6Mb2Y3vli9fqq3ugs0xvnnUwvphfTi+nF9GJ6Mb1x
/SbTi+nF9D7qf79n6o3OMr1x3sn0YnoxvZheTC+mF9Mb128yvZheTO+FFXe/
qzc6y/TGeSfTi+nF9GJ6Mb2YXkxvXL/J9GJ6Mb2H/W3+UG90lumN806mF9OL
6cX0YnoxvZjeuH6T6cX0Ynqv9X+wT9QbnWV647yT6cX0YnoxvZheTC+mN67f
ZHoxvZjeV/26v9UbnWV647yT6cX0YnoxvZheTC+mN67fZHoxvZjeu/0DyB/1
RmeZ3jjvZHoxvZheTC+mF9OL6Y3rN5leTC+2Y0Oy81Gy81Gy81Gy81Gy81Gy
81Gy81Gy81Gy81Gy81Gy81Gy81Gy81Gy89Fwv4+H562JPV9OxpefPFy+Z5rH
57PJmOvXmXN7Xpvrerd/PtfZfGRz3T/rred7w/3sD9+fyczXz88LzXHs/Xd9
/Py9/z6f620+iv8/+3Y+Wfj66S96wPrA
      "], {{{
         EdgeForm[], 
         GrayLevel[0.8], 
         GraphicsGroupBox[{
           PolygonBox[CompressedData["
1:eJwBCQX2+iFib1JiAgAAAKgBAAADAAAA4gIRFQUGEgIDEwMEFgYHFwcIGgoL
HAwNGAgJGQkKFAQFKhobGwsMKRkaIxMUIBARIRESJBQVJRUWKBgZ7+XkJhYX
JxcYHQ0OKxscLBwdPy8wRzc4MSEiLR0eMiIjNCQlNycoMyMkNSUmNiYnLx8g
MCAhOCgpOSkqQDAxPCwtPi4vQTEyIhITQjIzRDQ1OiorOyssQzM0RTU2gHBx
RjY3f29wTj4/Sjo7Szs8Tz9AUEBBU0NEVUVGUUFCUkJDTT0+Y1NUVERFYlJT
XExNWEhJWUlKXU1OXk5PYVFSV0dIX09QYFBRVkZHZFRVZVVWd2doSTk6aVla
ZlZXa1tcbV1ecGBhbFxdbl5fb19gZ1dYaFhZcWFicmJjeGhpdWVmdmZnempr
SDg5e2tsfW1uc2NkdGRlfGxtfm5vWkpLgXFyzb2+hnZ3g3N0hHR1nIyNh3d4
inp7i3t8jHx9jX1+hXV2iXl6jn5/kICBlYWGkoKDk4OEloaHmIiJm4uMkYGC
mYmKmoqLj3+A8PjnnY2On4+Qo5OUoJCRoZGSno6PpJSVp5eYqJiZqZmaqpqb
opKTq5ucrJydrZ2er5+gsKChsaGisqKjlISFs6OkuKiprp6ftqant6eotKSl
gnJzuamqu6uswLCxva2uvq6vwbGywrKzxra3yLi5w7O0xbW2v6+w1sbHx7e4
1cXGzr6/y7u8zLy9z7/A0MDB5sXUyrq70cHC0sLDybm618fI2MjJCBgXvKyt
3MzN2cnK3c3O38/Q4+IQ3s7P4NDR7ejS2srL28vMAhIRAxMSCRkYBhYVBxcW
ChoZuqqrCxsaDR0cBBQTBRUUDBwb5B0OECAfESEgEiIhFCQjFSUkFiYlFycm
GCgnGSkoGiopGysqHCwrHS0sHy8uIDAvITEwIjIxIzMyJDQzJTU0JjY1Jzc2
KDg3KTk4Kjo5Kzs6LDw7Lj49Lz8+M0NCMEA/MUFASVlYNERDNkZFN0dGOEhH
OUlIMkJBOkpJO0tKPU1MP09OQFBPQVFQQlJRSFhXQ1NSR1dWPk5NRVVURlZV
RFRTNUVESlpZbn59TV1cTl5dT19eUGBfUWFgUmJhU2NiVGRjVWVkVmZlV2dm
WGhnWWloW2tqXGxrXW1sXm5tX29uYHBvYXFwYnJxY3NyZHRzZXV0ZnZ1Z3d2
bHx7aHh3anp5TFxbbX18b39+cIB/cYGAcoKBa3t6c4OCdISDdYWEd4eGeYmI
eoqJe4uKgZGQfIyLgJCPdoaFfo6Nf4+OfY2MEyMigpKRhJSTiZmYhZWUhpaV
ipqZi5uajp6dkKCfjJybjZ2ciJiXnq6tj5+ena2sl6emk6OilKSjmKinmamo
nKyrkqKhmqqpm6uqkaGgn6+uoLCvssLBu8vKpLSzobGwpra1qLi3q7u6p7e2
qbm4qrq5orKxo7OyrLy7rb28s8PCsMC/scHAtcXElaWktsbFuMjHrr69r7++
t8fGucnIusrJvMzLg5OSwdHQvs7Nv8/OwtLR8Ofmx9fWydnYxdXUxtbVwNDP
yNjXytrZ6+QOzNzbzd3czt7dz9/eHeQe0ODf8u7jy9va7uriEOIR6ODRpZWW
5OUe+fHhvc3M8eno7ObU6Ong8+/r9u4B4uoC9PDs9fHt5ufE0ujR4+7i9+8P
7vIB7PDm7fHo7/MPxebE8PTT7vbq6+/k+PDT8fXh7/fl8fnpl2heKQ==
            "]]}]}, {}, {}, {}, {}}}, VertexColors -> CompressedData["
1:eJztmHsw1P/bxisl0TlFKVGRSuiEIpdjOpFEKZGKQig5JEmSRORQkhwihyJE
znLKMXK2zmd2rbXsflSIku9vn3nmtzvzzPxmnr+ev57PzM7OvGZn5/2+9rqv
+75X9MpNXbMF8+bNm2G9uOb9//N/9UQNu236/bsGJ3fVTohsykTIRlWjmRQS
2nMrZaXW1UK/8dbHHzKZmBCo1bUvISH9usXDfddrsVnobtvMjUxEVsm+cZ0h
ofy8B1lvrBYGIgdmf9Vk4lOG9iniTDO6J9zER6PrMG3yRn3udBbO/ZCena5v
RtDOIPWwJ/WQCrzdHjqdBZlBfX69Gy0Y/cvrqHWiAQ/y/Kt4C7Mh9iz9hvXW
Vmy00dCYHmqAtd/bfPPIHByxsskPnGwF7Y7PFCmwEX8P+SiTXufigJfU9VV9
bZAwfHdm9mQTyvI+Vnp9+Iy6cS/vCz3t6B5+p5eylgQ19afBM3V5ePul6dMS
ZgfMAz1jztBJaBSMkWtcWICxe+ScH8u7sKfVvMa5qhk1f/syZ44Vguvv0byt
St1olHRz7f/Ugvjp1Q9Dw4sgtv7tWsrdHnirci8wj27FNZ9ho6f3v8Bc2ep7
6pdeHLq+x+VzTDfc3dzT3BTLUHzxnKZMRg+4wwWv7y7uRvDZLUJrtcsQa+gl
eS+mB8KyDSmDgj2Yve9fdMu9DL4GC0JzbHvgtNhUYn5CD1xaeSXutpdhuY87
1+TmHgSZHn6aYNMLbFxy/Y52OZQeSfg3pnRD/5wY7eC1Ppyhq15UHiyHp1RT
o9HWbgSMvhur1ujHhVqxPyaBFXAfX5nHcOlCTXEt9RCjHybJ35I1z3+FuBoN
Pwo7Eb1oBdeR9wO466967ppcJU4+fsDTMdqBo47v1wzYDkI2w3fbiR1V2O1k
1jmxqAP8QYaj206QIZjJeytV8htszJiuNivaUaRYaHl2DwVeLu2Sj1GNpUJ1
JYq8bXhol9pL2zIE+dbhz8SlGngq0MtFp1sgJuW2574wFVF688dP+taClyZA
TexsRuyhg7v6tgxj4d+oesnSOvAY+PfIp5NwRd9irZzIENRu60jnXKxBlJ23
vcyfFtzd/nal3oEhXFwmrc5wqMGH+iWBCuQW8Dm+qT9gP4QdzXuD5xXXYKqh
bGAgrAVFPCL83l1DeJ1xQ9hIsRZNkT16seItkJszylayoCKcpnL/2VAttL+a
ruh43AzJWzUL8zcMY5QnOtMhtw4Zj1z97fNJyL1RRF3BGMbdaO2E5xn1yJm7
d7a2tgk0rh+h23poeBttkxNq0QDypST3qwWNaHF5/+Gb9wh4i2+Xv1RphG/C
WXPp8AZ0h3+gX1tBh6Za5oZXWk2QCg7rX9lUBxfLbTPJb+hwFm8NmrUiYUvr
rK0OalBPOhNxT3YUVGt+PpcIln9fn11j9LgKQW2pCt9aRtHkL1bA09MCd6WC
wJH4CgTmuWql3RuDe4OvStOONoSfE7AS/liKbkphgPl2BsZvfB1Udm/HR550
ieiQL3BbqjIlzU1HWju/gZBCE07fvJFtM1uHEMMVTZar6bDcX2obc6YJPVaz
vfvK6nB9r7Z7mywdNUtvPE8Pb4LQEVvHvI11sC4d8/h0mw69R0/9ivlJOFvy
9I/vklqkOq1/8LWMjkszD4fMc0mwCU0y3hZQjeUSmXi1axQevkHj0U+a0Va0
UsE2uwoJqg99reJGsbMnIHGhSwumtdrkjz35il9+3WP3ZcbQHBvoMP28FXsn
DZPIi8shlB6su7B6DEcm9nsyKttwL/JZnZVKCSpkgo1O2jEgYNfl57yhA8bv
t+da3SmErNBDi+LtTFA3v6LaeXRCivrKZ8lsNmoqJS1+UplQetp+7BdXN4xX
B9yjbfoErpryhHATAlFXf28UyuvB/F7hwTUOSdifQTTuuEOgSo++/ltGH+Ti
f25zoqeiOEpkzs2PwPJhrYdr+/vRuju31SktHftEsuU1VcdwSOl2VVxWK+o8
gto2ZpVhomuvYJjOGHbd+bjqKqkVBo9nfijal2Ghrq+UJut33D0Uc+WPRBsm
F1oRvKmlaHyxVMOseAxqdzsnojLb4Pp4QDXBugSDrlVR/qIM6Nt9lfd0bIcB
xS/JI/0L2uLnmuaHMsA31xi/2bwDwmMFSc5rCqDMlVuXL8GEWPPwTivPTujG
oGP+z2zoUUgx8dVMfPq6M1e+tgu0ep1VfYJpOBZ4/L2vIYFbCQ7DL4/1QF1k
0SlZ5URkde27TbpFIDVqNuqjeB9O8GeGi+1IhQKRoh/7hMAhx3n7xV/040pE
wbTYQBpUoqcqGyIJZOU/GNwdPQDZBwIZASWZKJrU2CqdS2Dn0uajYYWDsHE4
NGdTmQP6VQnPUBIBbvFOnkYqGY4SfeIXmXlYpuT/4geTgEA/U9F0/RB6Q8rq
XWSKIHLvQVXXWibme5KKnpl0grmdLyMsKge/04yfU8WYmGh5YZPn1glTkZlR
gWU5ePrSoz9Zn4nqU3zdgf2doFXX3yjSzwKD3DcuHcvEgozYOT7XLowpCNs2
P0rHpYa2g90rCKgmbLbgPtsN29tUefsTKSjXPKnPMCJwc41PGtW1B9uibHs1
GhPRl3s0XPImgQqPk6Jx8/vwwWSWy5ORgoNFt5y73Ql0NqwO9DXqR9IbI3md
U2lYUH7NIz+EwLrRcMF63QFcPrHOIYKeATkdLkH/VAIH3uSIDhsNQqLqxivd
4myo19PGNnwjMF/axkbXhQwz6TLZ8JrPyEz9Sts1RMDhpmJzZSIFHnPNDHXu
Qvz3tDCOTQd86knDQzj+boC7nLeYzbu5z19Zxj2M0BWOM+1bq9i85sn41HEp
GlxPT33LK2nAlwz9hcqs+0b52unm3OzBJ7X9bb/eJyLw3LZg0UsEyJlT7dTX
PViY5WSevyEJvcXXO/NMCRwJij/iJdALP5t23me3ktF07sKrcWsCditqWqeG
etG4PDfpQHQKnBcdaglwJhD6MTXp6bx+HB/ad01V9xMO3967+/JTAr9qFYfb
PrHqS9BZImF/OhalyHoKRxCQP2fQ+OPRAN692HBC51YmFOZy3d3TCPjvfe9a
YTcIxSXB2i2sevd7eWqbJku31d66u1VdyTgYc2DJQONnCGs42e2gEPjQ1sl3
J4qCIVG7eKfhAkSI9u8d/YfAxQjG0cS2IUj2/lMhGPaFrc+VV+8+nJ+gIrZ4
0+PomEo2P1zQNjstTEO877VUZZ8GNqfV2e79pT8CgZrEPJfvzWy+75fBsbZX
dFCNHUJFH3SAfKja8LArAU2yb0Lejn7kbfHepl/yCaGvtgwddiPwzvmLsJRy
P75NfFht/s8nDC8QMt3vSWBusxSF51E/gi+mtGtlpiE942LyvAACQpdrTpLH
+xHbbbJ1T386iHXTpbdYugnNkMm+TwbAH7Fh5SbnTKQtULyp8ZFA4mNyi7L6
IJRpKUu972VDVvaZhlwJgdY2nru9W8mI/eUX/6MrF2eOc1/9004gwrRRTHgr
Bbw/Oy9aP89HTu4/RzV/ENhe2xyTrzSEVEXBdMHgIvZ9X6Zv9DM2pkLw8yqt
82ZlbD4rZjAl6zKMSrMr95Pv1bA5z7VFn1cl0pAeYV7+2rOJzbsMOxkU2ggo
aq2xLxa1sXmmxt+EwX2juL7HPVwho4vNw3ojE+ZbjiEgtEbnt1s/Kx+DO0ZZ
dRd0ZkvlgN4AJujcBirjGYBClM2iMFa+vf/LZ201ANfkX8d1WHP0Iqv3j4+8
JTDeHCvumzaAFkszv/VEJsJbqSbPEgl45AtWl4mx/Kb7t/OVRDYsYwSfx7Hy
jTvGWbS6dBD2vXu++bTmYNIloepkNevz+nNp2d5k7I9n+Cz//hlRQrEi8v0E
uCJqMlXtKeBJGlXYd7MAclWavOunCUx1eDn/eTAEYwul9rqtHB8mmSoIdvhS
kaNYfGU2s5zNlafvfbaJHcYc35apX29q2Tzk2opZpQYa6hzKMxSWkdi8OY5h
Ql3G6vPiu5jBPhw9TRfkuagYjuK+z4/99ardbC4q/8X156MxtNosNRb83s/m
xhbJ5+cZMNBO8Tps95gC3eLzvq9ZvrK9z6QSmoPgngwe93ucDVO1RuevrHyT
sRo6fclkEF0TqnG8ldkwXCu1WyObVe95FoRYwiBq4oVylvrlwE477Q1RTMDx
aaBInggZD01ej5qTcvGmisssoIGAy4IFtfllZLh0ymnHBOZhadJM8uAggZlr
5ue3P6fgk07Hfa8vBXjKX5kfwtLzADG958XjIXAbqvpa7uLoKR1tbFPgRsX0
nYxlx405eo788+wfaZ9hMK9dfLSZxvHngpGe8QvJNPQrL10z4MfxZ51Rp5cH
ZQThtlsVPrP2nX/zvT1Usb1So3D6EzcVFcnx5wIz48n35mOYFdW+uu0eR88n
Er0Dxw8z8CMkvWzxagqbTz5SCjNez8T5NPmA1VXD2KAe+Ev3C4GSI14+8cvJ
sJpa+F0xOheNOsregaz6XUiee9C0nYxV/tt2Z1BzQRUfqVSuIkCfefax7DYZ
MivXtUSkfYa0z913is0E7MWWldIZZFAlbzYkz8+Hd5u0oBaZwBXZdLuGYAqc
1pUky9YWIHb3I6VdUwTisyq2GFoOQcdRWv4qN0fPkPALrdWnqZjwaE0+ysup
98h+bkrB0WEEZNvI9XJXs/m1skK3LYY0XKBoTG42a+T4U644cOLxCPJIkNCM
bGHzb1RZf7MKOq7rlId93t7J5mKyFfTh9WNYL/L5kcJkL5srnbwe0DEzBtOK
pDMvmYNszjgyXUBqZuCAiOntvigqm1/w9318J5uJ4oFLtkfs6ei+tcFptI7A
pcMNd7TSyChz+jDtfCkPi0P3FMg1Eqh8GcWzqoaM43Oq4kFxebhqvqh6BSsn
Fx/0y64RpMB7x7vnFxxZOalyKVObpWeLirLvIEtPr5W/R66z9HRea7Exj5Wf
Z8ghKvVqQ4gLTPw1FMPJT4a4kaTQGioqxLkmDqmXsLntlKlK2DgVWQEuIx5e
nH7UeUKs7BZrj9kucyfjS0o9m6/Mnrhiwj2C92Vd69UaOTmwtCPnha48Hd9n
/Q/Ii7Wz+aEjZknX3Uaxf+Ner3NVnByg2lgbbwkdQ1er9dpJnQE2X2d55qCl
LQMnBPaVaPzk+PaF6FbRiNNMhN0IviGST2NzSf6rFvEHCRgbvRIYfDeGWlWV
b4u7CDgfU3i/9hAF2lpNx+gN+Xid9sL6Ug8By4ezSQZ6FDz3WK5sLFiAre1z
Z8+z+vijdoVf/tEUpM5dfbibUQDVxTHkeoKAlnfSs7VbhzAyMTLZdbwIlj9J
r7xY/f3tzt7886QhvAzSqpZ/yfFtaWtgWchzKk7aOzpG9nFywGrMI9rEfhjO
kox5dFVODtidWfRd0JGGIBcr37IKjm99w4IuOwaN4ADjvXkDiePb6iR1Yd0a
OrL+qqdJHeb4VpXrrUbhhjGs6dKpVJvm+LZm2VJfKZZvG+TnnUgb5fg2YtOE
ZSTLt4pLBPX/RnJ8O7pW1WF7LvO//gPgCrxHZ/PW6LiUj3GsuT5A2jr9LhMC
Jhmj21lzYx9p68Zw1txoEkhXqV5UiA+/D670Hmb50Mwu7VgFBbWOhMRl7UKQ
hFyORrLm8CTjFuPCtUNY7yH101+8CBsHBg3UfxOonsl10goZQr/uwkSKOkfP
0SbzqhgFKrrzh2frLErZfPufzf4yf6lIUtRQiydzfMtTqRXiOzgMzzw5h14T
jm/z7xxOukCjwcTh3A9vU45vaVdchFX56FDbvZK+yJ3Tv2anxE6tODoKmdaH
zON/OXlbP5HIrWA/BofsnfN3JHPyllc1SfvdUQY8004xhdQ4vuWz4IsMZO2R
1/zLCBtujm87Uyb/5rD2g4PWz/4mfB9l8//5fmXNN6dNhwrwdf+dNpETceB7
GpTR01mKhrSPzcr7CqB72o5H9Egc6mQMDfe3lsJpX9pveb0KyEQK6wWpp0JX
R1Loztk6RJVLc12sq8D3DSErAyJSIZRJyjJn7e/GyT+Yw6z5QXYuon7yHgVJ
jtl7xD0KWP3pwQsdFu/2GmzSc6DA+oID76bbBexzHRfQMH97kYD7KBHBpcRg
84XyMj001ly5/HLEjpyJf/P//fNHzdTyC8tXNC7pzmNpFLy7arnplwBnH+G5
JHS0kdVnFOpU+U01COTxv92tpJaMQ403Vb+efomqLdSNqwbScatHR3NdeBbW
MLRKCacoCB2W/bMhpxC/C/w/EKz+/pu6YCKH1d8v+11+x1/CuZfVn5BAXdbc
YaOk2bskkgn7BLnFnirJMOfiD/bUeYkX0Q4bqH3p//Fex/blL9dmnb9Q+NQn
zWQKzukpR57l5ZxfU+SFQT+dgEGil352LPEfv8fNWlb5YUcWOqpHaj/GRcGo
1uXMM74ieHRLJFaxzh/VosVcHkiBzFHqk2cFnPNf1cm0PVhKYMCqeJfRDBP/
AkdcVhU=
       "]], {}}, {
    DisplayFunction -> Identity, DisplayFunction -> Identity, 
     Ticks -> {Automatic, Automatic}, AxesOrigin -> {0., 0.}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, AxesLabel -> {None, None}, 
     FrameLabel -> {{None, None}, {None, None}}, DisplayFunction -> Identity, 
     AspectRatio -> 1, AxesLabel -> {None, None}, DisplayFunction :> Identity,
      Frame -> True, FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultPlotStyle" -> Automatic, "GridLinesInFront" -> True}, 
     PlotRange -> {{0, 1.2}, {0, 2}}, PlotRangeClipping -> True, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
       FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           GraphicsBox[{
             RasterBox[CompressedData["
1:eJx11wk0VP3/B3BKD0nalDUiebJU0mYpbyJPKpGytOspJSm0SqEoKbIUKW32
yFPWZN8n+zYMYx+MscyYK2l7En/////+Zs75n/O/59wzc17nnu/3833Pd+7n
XsW/nS3tZwsICFTOnIIz539///+Ozy1H+nwHfXHmi7YYK9kFYVTG5Qj5IPyv
PyH9FumvsTGKohq3Jgoy560WtwnfB/EyofWL9Rvy+njy+mDy+mS8E5uIcIj6
B4aafwX1dITipY/Y/RWX0slxUslxnpHjfMSSrYv+eCKaga+JJ8OoG17CKMtY
pVw3lxw/kxw/khy/EHWuCQXXyrLRvKioto8SjUtXC3o33y4m580j540l5y2F
/xtcO+hZiPd76yw6P8fjU/AhTVF7CllPMVlPIllPOWIvsMOXvyiBn39nE215
EqSTvnl27awk6ywj63xH1lmN23O3XBa/TsGJihHretNknKM8qk3RqCXr/0TW
n0LWXw+7WG+LaasKvPKedGLmpKLHWVJ8u18Dua5Kcl1p5LoaoY86jTGtaohG
+aztbUiHiIf9B3V3KrneGnK9GeR6myDXLj23d0EdrhWKjnWxPmD9g/QjS52a
yRzqyRwyyRxo8MhJG3e42gBmV0hq++RHHA4XFJo+2kLm00jmk03m0wrOPbpd
L7MR+yalLrUuzsGdWPOkIXM6mRuVzC2XzK0Nh62m6g7ub0KBTOTG5tV5eJ/6
0pJq2E7m2UzmmU/m2YEqJeVt1OJmqOn8+a1BvwAtBeyfuRs6yZxpZM6FZM5d
0BkzTdql2YIa9daO02pFEKjRiYpb1U3m30LmX0Tm34OEfGfp0letmJUbsdV+
UzHCOEax5fMYmMy5ZfX7JB0iu0VPq6cXg7EzsjhenIFXpQtDN2u2wahQQGzp
mhIcXunt6pLYA/2aSKrzZBs8N3xPnYovwfeM0uOPN/Wgp1lzUWJFO7LfjNoM
rShFiMmcvZnF3bjdVWTeF9qBCVnm78aIUmjQTba2mXVDiWURKHuiE+uC22Ny
JcpQftZPbbKtC2VcRs2BNV04J9RoGhdYhhO/KqUUTnfB/rvLvMCfXYh3KycC
RSiYDJgnvH28E3MEBHeVU7rB4OSHuXlTEC5v9vWUZyfiRUL8BB71QO5Eht7f
kxRopQT23xPtRKxfcL/cOgasaW97d1/9hBrDhsa3TzrwNYDurRPGwCPTqHub
xmb2b9PMhlTqgEnICiXrXwzU5oevUXAsxyz7/e/H3rfjSZhD8cUTvRDRCmwS
YZbjxbfQF0v02sF6lmIXVN6L7fF3ro8frYC2X8uDzeVt2PLqx3TSmj54ytxQ
6GytAFVa6vrB/W3wizZ4XfG4D9mBrhTKvkqcTzp45mYPHfR4P/2Bn32YmOVw
Lrm6EiLbnlu9PkeHalJDl6BdPzSvHVv0bEcVous6jUq+t8I9WcpD/lM/HNkH
PnoXVmGbnbzWgE8rqtLt5PQ0mIg/vvuok0416J+PrxBZ2Aq5rIRcm0dM9DYZ
zrZOr8ZFnyhx9RctcMobO3T5BxNyO7UTsaYG85f2T5qtbkFekfa/wccGYJO3
1lz1TQ0S4pXZLhk0iFFuPXtXNoAQzVVfFyvWwlj7dNtjAxqOVlZoV6mxUBMr
+3wyohbdlW/KM2ua8b52IZ0VzIKw9GJDlkQdrh8e/tBm24ypRttrs7+zsP2h
yGB9YB0kRtViJ5lNMG+JXLbi6CA8BacDskVm/seeTo8UXJsQ2T70YWvpILKv
fNWK8a6H6cL3t7b/pmKsW9PqoOoQJobZ9IDJejCjiAv296nY3u82cSVoCFLr
XKGn1zCzf9cf9VtKxaPBosePvg5h01mnxZpuDZCmXNydFNWIRIqerJnpMPqn
kzN1ihqQM2Dx1kWzEeY2cpeM3IaRan7nt5N8I84oO4y4lzVgYmiySufNMLxe
2xpH3myExEkvtbu2DYhw71LSbBmGGaHh39TeCB+jNTT5tnpArMBdZc4IZCBI
/UOHCkbRYasNgvUYePmKKrdxBEOBNCndcCr09B/Q/lKtg/86L7UlJ0eQ2Z14
/PxXKp7kZlkd2VeL9cXHvec+GsGdtZ7xkTP3mzHtQZrL9Rq0WBq0TxeNwNLT
crQptQm7Mpda342qxk3mCq1vxAhW1KlsFF7YjLgNxi3PKqugdFXwAUeeDe7y
X+66F5ohkHrR+v3nSlQI9/X2mbGRd76++PzM73dobVRLifTMPn1WotN2k40H
+TEiUWo0ZCTVW7caVmCJekxIfRIbtvPdzJv9aFigOtXCPluO7DyfYUo7GypH
9zwRHqTBMV7DRuDRJxzfe8owby4HE/+s6NLd0YKylYdbJXIoEGIYP0vT5qBk
cmLlhZgWyEfdt1HtK8Nb11WfE85wELSn0jFKsBU35bNat830J/PZf5i+fsLB
sRcvU5uPt6LlOcvGUqsUX0NZkWEUDjQ4rj+EC1qxXnop/fShEjxXKf/hP8HB
v3om0JOjw/+Jke0N72IYZL2x8F45igp/Gd8L7nSwllykB70tAsvUL8HNchRP
Org1UXQ6bikZpu6MK0RAh4OA8+1RnFIvXULb3IbNy1+lun7Nh9Z5U1v7lFFo
3Qg/JBLWhhHJX6kRO/JAn1JNOdwzCoHqc1F6X9oQudg2rTQsBx7BoiKW4lzU
yRgMXdjXjgPzP6RxBrKwUol9fOc2Ll44SqyLTm6HqMji9KWbP6IyvfqjvhMX
jjlDV2jzO1Awyzld3/cDLuz4Z8Gm51xsFs3PE3HqgNvv6vQzLemQaA04o17F
hdChkNlbqzqw9sfqjGCVNGQ7nC9U/MkFNdF+l/PqTvSN383IvpqC4/+aSUqt
JhD5Uyck2rcTmh2Us5SH7zAnYK2zuA0BZ1NxOo3ZiecNXo6Sa98iMYnOVjhC
wJ9bu+amdReok0Hy5ieTsKfa22H9CQJvHj/0UarowlzVSKrv038wNqIxsP00
gVJts7YKnW4YWKX4FtS+Q6ho64kD5wgwusTWOSd1w+12ke63WcnYona7296F
wKR3zZ2ly3tAt3b4vkwuBR2m6oevXSEgtTqgPTewB1+cXBrTMlPgdZbW6udO
IIK1Smq9AAMLfNyS9u5Lxcr7XgcivAiszp5jJKTDgNqzW3dH2Kn4lKDamHSH
QKb/wPlWVwZMkv2O+/qmwbGiySz/PgHjY5Snb98y8DclWEdJMR3iQx5VdYEE
qJpxpR79DHh0PF1SkJuOVOHVfzEeE7CbfZdrIdeLp58jRw9aZ8DqT2rp56cE
uLRT0spWvcgQTiz/OpaBnyY3DWa/InAzwdj4+8NeNCxPjQrx/4AXp1XyJWII
iN5Qdq761AvOhuwba1QyYeDboKOSQCDcTCji5XQvZu8qtqosygQzzj1zyzsC
q1Ywy1y0+6BgV7nO/vBH3KMobzBNI5A+XkoYufZB92rjXMFvH6E+UJd86CMB
Q0qMjOTbPlgHtPW/CM5CvdB1Dac8Ag3hPjtG+vpwMbo3X1s9GxeVVyZ6FBM4
5njSJV+2Hw+zhsObKdlYZly7KugTAc5Wo+fBB/qRUPfZ1cUuBzknr0VHVhNw
X7Dy08mH/Shj/twt9isHx3wUFdIaCIj0zfq8eaZfMf4VVEkIy4VgTPXzUhqB
Jxl9sqLT/ZhcKCpgrJmHuJIrUrR2Asr3Sky6tjAh+efi9p6qPJj2KYSxegik
HYx2TXFhQmubTMYN+3xwBKsW/WASMNDwfuGTyMTe/UqBkgIFCFa8HDh3hEDd
1Ily6z4mHM+qOaRHFGCjofw8WYLAkUbDcVXZAfh6aW0331SIVruKexoTBEZi
FJf/3j+A6DBdOXZ9IW7cuiik/5OA21XBnQ0BA+i2UrxhtKkICpFyt82nCPxh
2nsxhjIAjt0qhxDvmeey/znGoBl7+0+TnwO436/2W/F+Mc8TjGZFWcz0yUHF
9az9nBKeK/R7yxw+zIKx3Zb6u+ZlPA/3nh1qH8BC9KttWR/TKDxfoHRnvks+
CwJdRlHDS8t57lssdM+dy8JR2V0PZK9X8HzK7q7AXYVB5B60uGTWWcnzKwJ/
uAdZDGLhU+sjXqjmOee175dntwdxoeXIjtToGp6fgvD52LRBVEucXNs/p47n
nd33WO/7B6G6/6zk0rP1PD/gKWKXLTGE0oott1aebuB59fL7baU7hjA+mHM5
T7KR50b5c/fXXR2CorD+WatKvuceeVBDfzMEC5Xio9yZ94L/uNakqEk/fQie
O4wt72k08fztc//C0bnDeH+q3GRFN9+V9MR0fugOo9Nnl152UDPPI9oD0mY5
DWNeTO06S0Mazxe5z9eY/3IYuiUWyuxxvt+XDoyTrBuGQ2+T1J3YFp4LZIsr
KE0P46mAzfzlM+8R/3E326CnGpoj+KTQLpgpTOf52PcFi7ecGMGE/tFve7P5
7hAe7G840+eVjzFGBh3beM7YvGjOntKZPu9xsueWXDvPbVpCPK0nRuD9gtUk
Xcf3+iuLf9itYiMl92xFmlcHz02WPnY9Z80Go52Tt3t9J88LMpawr9xjQ/xf
51RmH983Hwg9dSuLja3SX+I8Qrt4/v6LRPeDYTactK9GLDPp5rnK4zCbMBkO
Imx+BiZ/5/sNj9D3HGMOPLp7w68W9/A88HdQUdcJDs5FVDFrjjJ4Hu3hT63z
5ODpjliP7na+f/jtyyx8zgFlzGPZmE0vzys9vL+lZHEw/twmWZDG967fHiLR
NA7k/1q/c4llHz9/j+syj8c52D0u2qtcz3ehqcsadxaMwu0l8/rmPf08l/R0
0b+iMYq4nQWLd1byXX3qnMVp01FQv4QnHTRh8lzf88zfNqdHMfXK1fhcKd8t
p/6+vNNnFOq7dnfdNBjg+WnPY746kaOw/ap8NTCf79enDj5Vyx/F3cgp8Uhd
Fs8felq9lW0fRdpu+pvUj3yPnLLIE/s+iu5vqQalGwd5nuG5p+73Ei7mRfu3
NafyvXzqLwZXkwttM/uLrLVDPO/wNBrvMePi1A/9eT+S+E5M6Qs1OnIREiMV
O1d1mOezvHSXldzjomDv+FbZeL4vm960Oj2Wi5Gf1TSNlSM8V/VarxtbzIVU
XNwF/Ui+b5vW2BPWzYWxhZewxXI2zy28Vh/z/cWF6y/byBMRfD85vdLlmtRM
/4/X0rkkyeH5NS8Fb4dNBCr2iVHvhPL9wbRM6EFLAhOTA45PFo3y/JXXsvhd
zgQUEwpnJwTyPW16UZZeADHTX569yJ7H5TnFa36VRuJM35u6uKnaj+9t0yKd
y2f6ZELinrrOOQT/vuolxBXvJ9B8QOUM15vv//fzvwBUb9L1
              "], {{
                Rational[-15, 2], -180}, {
                Rational[15, 2], 180}}], {Antialiasing -> False, 
              AbsoluteThickness[0.1], 
              Directive[
               Opacity[0.3], 
               GrayLevel[0]], 
              LineBox[
               NCache[{{
                  Rational[15, 2], -180}, {
                  Rational[-15, 2], -180}, {
                  Rational[-15, 2], 180}, {
                  Rational[15, 2], 180}, {
                  Rational[15, 2], -180}}, {{
                 7.5, -180}, {-7.5, -180}, {-7.5, 180}, {7.5, 180}, {
                 7.5, -180}}]]}, {
              CapForm[None], {}}, 
             StyleBox[{Antialiasing -> False, 
               StyleBox[
                
                LineBox[{{7.5, -179.99999999999997`}, {7.5, 
                 179.99999999999997`}}], 
                Directive[
                 AbsoluteThickness[0.2], 
                 Opacity[0.3], 
                 GrayLevel[0]], StripOnInput -> False], 
               StyleBox[
                StyleBox[{{
                   StyleBox[
                    LineBox[{{{7.5, -179.99999999999997`}, 
                    Offset[{4., 0}, {7.5, -179.99999999999997`}]}, {{
                    7.5, -115.7142857142857}, 
                    Offset[{4., 0}, {7.5, -115.7142857142857}]}, {{
                    7.5, -51.42857142857141}, 
                    Offset[{4., 0}, {7.5, -51.42857142857141}]}, {{7.5, 
                    12.857142857142877`}, 
                    Offset[{4., 0}, {7.5, 12.857142857142877`}]}, {{7.5, 
                    77.14285714285717}, 
                    Offset[{4., 0}, {7.5, 77.14285714285717}]}, {{7.5, 
                    141.42857142857144`}, 
                    Offset[{4., 0}, {7.5, 141.42857142857144`}]}}], 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4]], StripOnInput -> False], 
                   StyleBox[
                    LineBox[{{{7.5, -167.14285714285714`}, 
                    Offset[{2.5, 0.}, {7.5, -167.14285714285714`}]}, {{
                    7.5, -154.28571428571428`}, 
                    Offset[{2.5, 0.}, {7.5, -154.28571428571428`}]}, {{
                    7.5, -141.42857142857142`}, 
                    Offset[{2.5, 0.}, {7.5, -141.42857142857142`}]}, {{
                    7.5, -128.57142857142856`}, 
                    Offset[{2.5, 0.}, {7.5, -128.57142857142856`}]}, {{
                    7.5, -102.85714285714283`}, 
                    Offset[{2.5, 0.}, {7.5, -102.85714285714283`}]}, {{
                    7.5, -89.99999999999999}, 
                    Offset[{2.5, 0.}, {7.5, -89.99999999999999}]}, {{
                    7.5, -77.14285714285712}, 
                    Offset[{2.5, 0.}, {7.5, -77.14285714285712}]}, {{
                    7.5, -64.28571428571426}, 
                    Offset[{2.5, 0.}, {7.5, -64.28571428571426}]}, {{
                    7.5, -38.571428571428534`}, 
                    Offset[{2.5, 0.}, {7.5, -38.571428571428534`}]}, {{
                    7.5, -25.714285714285694`}, 
                    Offset[{2.5, 0.}, {7.5, -25.714285714285694`}]}, {{
                    7.5, -12.857142857142836`}, 
                    Offset[{2.5, 0.}, {7.5, -12.857142857142836`}]}, {{7.5, 
                    0.}, 
                    Offset[{2.5, 0.}, {7.5, 0.}]}, {{7.5, 
                    25.714285714285737`}, 
                    Offset[{2.5, 0.}, {7.5, 25.714285714285737`}]}, {{7.5, 
                    38.57142857142859}, 
                    Offset[{2.5, 0.}, {7.5, 38.57142857142859}]}, {{7.5, 
                    51.42857142857145}, 
                    Offset[{2.5, 0.}, {7.5, 51.42857142857145}]}, {{7.5, 
                    64.2857142857143}, 
                    Offset[{2.5, 0.}, {7.5, 64.2857142857143}]}, {{7.5, 
                    90.00000000000003}, 
                    Offset[{2.5, 0.}, {7.5, 90.00000000000003}]}, {{7.5, 
                    102.85714285714292`}, 
                    Offset[{2.5, 0.}, {7.5, 102.85714285714292`}]}, {{7.5, 
                    115.7142857142857}, 
                    Offset[{2.5, 0.}, {7.5, 115.7142857142857}]}, {{7.5, 
                    128.57142857142858`}, 
                    Offset[{2.5, 0.}, {7.5, 128.57142857142858`}]}, {{7.5, 
                    154.2857142857143}, 
                    Offset[{2.5, 0.}, {7.5, 154.2857142857143}]}, {{7.5, 
                    167.1428571428572}, 
                    Offset[{2.5, 0.}, {7.5, 167.1428571428572}]}, {{7.5, 
                    179.99999999999997`}, 
                    Offset[{2.5, 0.}, {7.5, 179.99999999999997`}]}}], 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4], 
                    Opacity[0.3]], StripOnInput -> False]}, 
                  StyleBox[
                   StyleBox[{{
                    StyleBox[{
                    InsetBox[
                    FormBox["0", TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -179.99999999999997`}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.25\"", 0.25, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 2}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -115.7142857142857}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.50\"", 0.5, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 2}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -51.42857142857141}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.75\"", 0.75, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 2}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, 12.857142857142877`}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"1.00\"", 1., AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 2}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, 77.14285714285717}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"1.25\"", 1.25, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 2}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, 141.42857142857144`}], {-1, 0.}, 
                    Automatic, {1, 0}]}, 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4]], {
                    Directive[
                    Opacity[1]], 
                    Directive[
                    Opacity[1]]}, StripOnInput -> False], 
                    
                    StyleBox[{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \
{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4], 
                    Opacity[0.3]], {
                    Directive[
                    Opacity[1]], 
                    Directive[
                    Opacity[1]]}, StripOnInput -> False]}, {}}, {
                    Directive[
                    Opacity[1]], 
                    Directive[
                    Opacity[1]]}, StripOnInput -> False], "GraphicsLabel", 
                   StripOnInput -> False]}, "GraphicsTicks", StripOnInput -> 
                 False], {
                 Directive[
                  AbsoluteThickness[0.2], 
                  GrayLevel[0.4]], 
                 Directive[
                  AbsoluteThickness[0.2], 
                  GrayLevel[0.4], 
                  Opacity[0.3]]}, StripOnInput -> False]}, "GraphicsAxes", 
              StripOnInput -> False]}, PlotRangePadding -> Scaled[0.02], 
            PlotRange -> All, Frame -> True, 
            FrameTicks -> {{False, False}, {True, False}}, FrameStyle -> 
            Opacity[0], FrameTicksStyle -> Opacity[0], 
            ImageSize -> {Automatic, 360}, BaseStyle -> {}], Alignment -> 
           Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}},
            ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> 
          False], {FontFamily -> "Arial"}, Background -> Automatic, 
         StripOnInput -> False], TraditionalForm]}, "BarLegend", 
      DisplayFunction -> (#& ), 
      InterpretationFunction :> (RowBox[{"BarLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{
                 RowBox[{"Blend", "[", 
                   RowBox[{"\"SunsetColors\"", ",", "#1"}], "]"}], "&"}], ",", 
               RowBox[{"{", 
                 RowBox[{"0.`", ",", "1.3971399357258385`"}], "}"}]}], "}"}], 
           ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"{", "}"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}], ",", 
           RowBox[{"LegendMarkerSize", "\[Rule]", "360"}], ",", 
           RowBox[{"Charting`TickAnnotations", "\[Rule]", "None"}], ",", 
           RowBox[{"ScalingFunctions", "\[Rule]", 
             RowBox[{"{", 
               RowBox[{"Identity", ",", "Identity"}], "}"}]}], ",", 
           RowBox[{"Charting`TickSide", "\[Rule]", "Right"}], ",", 
           RowBox[{"ColorFunctionScaling", "\[Rule]", "True"}]}], "]"}]& )], 
     TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{3.8090867346492176`*^9, 3.8139976080195537`*^9},
 CellLabel->"Out[14]=",ExpressionUUID->"9ccb2a95-8163-4dc7-85d6-27816cb84fdb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[", 
  RowBox[{
   RowBox[{"Sqrt", "[", 
    FractionBox[
     SuperscriptBox["x", "2"], 
     RowBox[{"1", " ", "+", " ", 
      SuperscriptBox["x", "2"]}]], "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "8"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.809422151090068*^9, 3.809422174003321*^9}},
 CellLabel->"In[49]:=",ExpressionUUID->"1a25b281-3c4c-496a-99ab-4f5413f41b6d"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[0, 0, 1], Thickness[0.003], Opacity[1.], 
      LineBox[CompressedData["
1:eJwl1Xk01G0bB3B7ouxkZJpsldfWIqJy3VHIkmwh5ZEhSpbwUCjZSpaoZClk
X8uuZCmVtGhTloSRaRhjZvzssmTe33veP+7zPZ9zvuc+1z/3dSu4+dl48HBx
cVXj539p5jHe1caINfjj/v/kM5LzHya4w2cK5dIAnnseZmTVEYJAmra1rQBP
8099tdmEGMjILTN0wdPBfbH1DiEV3l6Z2nBPNhWGtG4YJREKwZ6cQk6XLoRc
aavr8YR6sA+QE3q5vh4iBeu23yS0wzs1ZYrBwGtwdMqrmpruhr/6Xw6s0L8D
NmAnlC/XA2ra8nt/CXXDdRdBD1ujHmjg2HjWaHRDHdlP7klqD2SutKrLBnaD
iO/B2DDdXlAKC9aeX+2GN1H9JwWu9AFZM3cjZUMv7H4kLiAv+BOCGir0eYg/
QJgTecpkyzCoD3bUWawOQMY5Bxd142EYkm8qMSYMgnK3uqu47zD0RycaqekM
gkFZH3mgFe8To/zq/QbhWVlaw1PNX8CfH5rUMTIIbFtWi/nnXyBX57R34uUQ
2JemdwZupIK5fIDYgYBhULGeHH+dQIOom4qdXGYjIBdhou+ZR4ODa2kBwydG
QOxxboLQUxrQVr/tryWPwLKgraY1lQae/Crm2ldG4Gvb00DKvlFYO5DNX1E1
AqE7I9f+jI6CcmIc2UuCCp9FpaQ0ER2OhnelW3+hwuuDPh5d9nSIUt/O+/In
FRq9O54EedPhH91GL5UxKhS8veTUnEYHJ4FW9GmVCpcihnJM2XSw/J2xlKn6
GxSxYlXy/XGw6imx1Yz8DSGf9SBjjgFmvt77QnfQQESzYfS94ARwj9jeYe6i
QWHSzsQV+QmQkhrTsttPgy6L7f0uRyYgVox9XPgYDdQ6pQJV0iZAdVqPLh5I
g+G3WHGtLhP0JN5bXW+mgcnLIpFPoSzw6A1+sN94FChbFRrWbrEgfkwqPv/Y
KARdy3LeWcACiAq5x+0wCnlwt/RuJwsUPzwilnqOwkrrNcOT8mywck6qSY8b
haom52B6Kxs2Tt77KvB+FDbVi1O4uTH4eENvyPbwGJxKXLGjyWBg8+9PZW+L
Mch3H+3sUMeAlPlFOdRuDNSlnz1LcMSg8PScb4T7GBgGu96TrsbAoXxGckfM
GOhkORSnak0BT/jU1z8vx+CMS/HpUsoUvGVpF3zVpUOM2ebMTMYUIJ2QpkkD
OhTrpHTHz03B9UWVBH5jOrBEQs19hKbB+tCdEKIdHYJfWOrt1pkGZivTZtGP
Dolb56VakqahRpy7zqmYDk+oRh+/HJiBxqVSygaRceg1jZxOMpmBq+Jevnuk
xmGh8rmMhc0MNGu4DdnKjYNumN6Zd54z0PHgRGDUtnFolNRaaLszA5LHtumk
G4zDs8NyW2vHZ0DoUXRzoc84tBRPBaamzoK0omN92NtxeHU+e7MTaw4ILU1t
Ht4MqGN4e7sszIEPp+nJiB8DCr30m8lc89C5YJXjFMSA2LN9J32l5mGbNtPm
4BUGmLqJ348+MA99Y7Q33bcY8MUpVrYycR7iCMc9TGoYMGjqI82rsQDcGrqm
DrMMmN92UPSxzyIsaYeWz1yYAAOq4dv4S4tApjo+7/WfgOvZphFe0YvweilQ
6WnQBMhI2WFKmYvQzeiYvhA+ATrc3l/uty9C058ysccJE3BpICM5bvMfUNtk
1htVNgGryXOi7u//wDcJ/RsPqRPAs1QhtlllGTZ2xrt4mjNh8yfDWdBaBjJW
1G16jAnaef097nrLoGzRMLDdmgkeR9c9qLRcBuJQdjHlBBPeZbqpGAYvQ0JH
SJCWGxOS9Qn6594uQyj5rIjrJSbIh18nPz23As8XvHI3FjBBh+P6xLZyFSTN
uxSkZ5hgYdkWdaRxFVaULiy4zjGB/IBkpftqFS6ebVsqX2BCii6FLte7CtY/
i+7qrTCB4edMoP5dBT5jnyOH+FiQ9cs+3N/yL+S8mldclWYB9yszwyTWX1jO
mQ5S28eCjzHanzv+w4E7gnzq70JYoC/ayXN7Lwec1FVv9VxmQWnmGV1nxAG+
9VcPjYSxILryVi5mzwHjlbv5sxF4/8d4gGwkB+J7ha/yxeF9texN5/s4UBF5
U+xHOgsMGVHVAoZcqLGHOGP9hAWkFOZS2SQX8vab0hqdZMHzMxFltbNcaBvh
6qXgKRa47JF0av7DhWS/y2QLzODz9+o3fuThRq4X711VmmeBLDE+GJPhRop/
W15YrbBAonzHrDZwo2ybzi2B69jA3+7BepGM92Na9rG2sIG5OEzp2cmDfrst
9QyYseGJZ/IrMx0exFkn0G9iwYZrfQbFL/bzoGaXvR9qLdkg8zTbp8yYB/2U
FQuLPc7G37PzavgpHjQdzb1nywk23J/rJSjH8SBzjcifxDNsMJ3+ZBcwzIO2
5gm3nwpmQ+FE8weRW7woa6NflHAOG3zTrZTO3+VFqo6zI9oP2aB7+HfYmwxe
5Lb9tv/pXDZ8yBbSCC/gRdNr/Fse5bNh+rhTMqORF43WK3yGEjYYPF2wbf/N
i5wnBZQOVbPxf2bX0GU9PqSBFYdUv2SDCLEEo9H40GOuXXCWyobEcw1nc5UF
UNtayet7spOwgCpoXhHrEHF+Q/Qvs0kI2t1eL/NaEEkqiZkdCZyE4cr2hC4F
IaRg6JqyI3MSVs53P1ANFUZ9470i555NgtqhdWtnmzcge6Jc98fvk2CSr+BZ
s0kE1Zcc7eBhT0II8R/FkVOiqEirNqEb35vqLHvhPksxxLbwWycqhYGk6JRg
+7IYWpztaW1SwYDvxYMqpSxxxMer6haljYG3dnP/enMJVEPxqmYYYlBx1C33
+YIEkvC3/zfPCoN5ppzYWJokCtsb3nHmJAYNtia8qYelUMEc/e+SOwYRprEP
68ekEH93/v0VHwwUhsx+FMRKo2WltWeSwRjo68akEnbLoPKW2+lbr2JwasuX
Je7vMki0UHOTQCx+/4ckqn/kJnT7TXbHWAIGGXwuQTbKsqjz9o7Krtv4/JSG
fJ52WeQy0zi0Kx0D/iuRdnoXCWj90Y7zGVkYcJW5VFEl5JCrfQPhSB4GAfer
kiReySGb/ribS0UYtKrFCYr7bkabi6YPGJVjIG4WoB4lIo/y6f4n1x5jMKjx
9fvlFnl0ME31xpsaDKpzQJnmQkTqiQul4g0YnK7SESeuEVFo9EKxXCMG12Lz
IgfLtyCjHVjRrmYMHo8TH4hYkFCKkNK3sVYM4rJjXSnHSCgoQSVxBre7DVul
0pqERCs2GK3hlm9pqbZ0IKEx5aQS6ecYxCc7dyS6kVDVlX/ND+P20smcFrpM
QqeFejm5uBVjpEzXFZNQ6s7jio4vMFjbF76xr5SErnmshJJx97N/fyuuICFH
08dffXGnONSdNq4hoUV91cBY3Jz/2ATGtpCQdk1Oai3uwa7kHN7vJHTxhIfZ
hjYMGq8vkr/3kFBz9kLgJtyp+/9RLfhBQrtYOfcVcZsXadYbUkgoq2jf8D7c
TZc+vY9kkFBH/qMjHrjTNPYmW7NIaMpAwtEf90Vqlp0CRkKztDTPMNw7LC4M
t82RULkJ99XbuPm4uwtTFklolDMek4X7V8P+867LJMT7bDauBHfL+QKtnX9J
qMFPMb4WdzpJeJ7DIaFDW4PjWnH/F9H4bEo=
       "]]},
     Annotation[#, "Charting`Private`Tag$22662#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.809422161719391*^9, 3.809422174814335*^9}},
 CellLabel->"Out[49]=",ExpressionUUID->"6cfb7085-5eda-4235-9d2d-10521c9d7d4e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Sqrt", "[", "0.8", "]"}]], "Input",
 CellChangeTimes->{{3.809422251351944*^9, 3.8094222540675335`*^9}},
 CellLabel->"In[50]:=",ExpressionUUID->"c36802c2-414f-40f1-8ec6-6aac72d278ac"],

Cell[BoxData["0.8944271909999159`"], "Output",
 CellChangeTimes->{3.809422254714828*^9},
 CellLabel->"Out[50]=",ExpressionUUID->"94eac2da-bb92-410c-b673-fdf8757c14da"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", 
  RowBox[{
  "\[Kappa]x", " ", ",", "L", " ", ",", "W", ",", "d", ",", "S", ",", 
   "\[Theta]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"form", "[", 
     RowBox[{"x_", ",", "y_"}], "]"}], " ", "=", " ", 
    RowBox[{"d", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", "\[Kappa]x"}], ")"}], " ", 
        FractionBox["x", "L"]}], " ", "-", " ", 
       RowBox[{"\[Kappa]x", " ", 
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox["x", "L"], ")"}], "2"]}], " ", "-", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"4", " ", "+", " ", 
          RowBox[{"S", " ", 
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", 
             FractionBox["x", "L"]}], ")"}]}]}], ")"}], " ", 
        FractionBox[
         SuperscriptBox["y", "2"], 
         SuperscriptBox["W", "2"]]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"-", 
        RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "x"}], " ", "+", " ", 
      RowBox[{
       RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", "z"}], " ", "-", " ", 
      RowBox[{"form", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", "x"}], "  ", "+", " ", 
         RowBox[{
          RowBox[{"Sin", "[", "\[Theta]", "]"}], " ", "z"}]}], ",", " ", 
        "y"}], "]"}]}], "\[Equal]", "0"}], ")"}], ",", " ", "z"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8094279911383867`*^9, 3.8094280390196376`*^9}, {
   3.809428083767582*^9, 3.8094280848631244`*^9}, {3.8094283179199758`*^9, 
   3.809428354936594*^9}, {3.8094287187101965`*^9, 3.8094287918448277`*^9}, {
   3.8094289495406995`*^9, 3.8094290245605135`*^9}, {3.809431646740487*^9, 
   3.809431681649638*^9}, {3.8094317771781173`*^9, 3.809431777378581*^9}, 
   3.809431848833609*^9, 3.809431894354072*^9, {3.809431926760583*^9, 
   3.809431942610161*^9}},
 CellLabel->"In[8]:=",ExpressionUUID->"a69376b9-050c-42b9-a8b9-29f88c915011"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "S", " ", 
           SuperscriptBox["y", "2"], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          RowBox[{"L", " ", 
           SuperscriptBox["W", "2"]}]], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
         FractionBox[
          RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
           RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          SuperscriptBox["L", "2"]], "-", 
         RowBox[{"\[Sqrt]", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             FractionBox[
              RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
               SuperscriptBox[
                RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
               RowBox[{"(", 
                RowBox[{
                 FractionBox[
                  RowBox[{"4", " ", "d", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "+", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", "x", " ", 
                   SuperscriptBox["y", "2"], " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                  RowBox[{"L", " ", 
                   SuperscriptBox["W", "2"]}]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                 FractionBox[
                  RowBox[{"d", " ", 
                   SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                   SuperscriptBox[
                    RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                  SuperscriptBox["L", "2"]], "-", 
                 RowBox[{"x", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
              SuperscriptBox["L", "2"]]}], "+", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{
               RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
               FractionBox[
                RowBox[{"d", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", 
                 SuperscriptBox["y", "2"], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                RowBox[{"L", " ", 
                 SuperscriptBox["W", "2"]}]], "-", 
               FractionBox[
                RowBox[{"d", " ", "\[Kappa]x", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
               FractionBox[
                RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], 
        ")"}]}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "S", " ", 
           SuperscriptBox["y", "2"], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          RowBox[{"L", " ", 
           SuperscriptBox["W", "2"]}]], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
         FractionBox[
          RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
           RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          SuperscriptBox["L", "2"]], "+", 
         RowBox[{"\[Sqrt]", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             FractionBox[
              RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
               SuperscriptBox[
                RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
               RowBox[{"(", 
                RowBox[{
                 FractionBox[
                  RowBox[{"4", " ", "d", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "+", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", "x", " ", 
                   SuperscriptBox["y", "2"], " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                  RowBox[{"L", " ", 
                   SuperscriptBox["W", "2"]}]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                 FractionBox[
                  RowBox[{"d", " ", 
                   SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                   SuperscriptBox[
                    RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                  SuperscriptBox["L", "2"]], "-", 
                 RowBox[{"x", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
              SuperscriptBox["L", "2"]]}], "+", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{
               RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
               FractionBox[
                RowBox[{"d", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", 
                 SuperscriptBox["y", "2"], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                RowBox[{"L", " ", 
                 SuperscriptBox["W", "2"]}]], "-", 
               FractionBox[
                RowBox[{"d", " ", "\[Kappa]x", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
               FractionBox[
                RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], 
        ")"}]}]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.813997578230275*^9},
 CellLabel->"Out[10]=",ExpressionUUID->"8491aedf-fbef-4ede-bf88-11d4a28a0072"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "S", " ", 
           SuperscriptBox["y", "2"], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          RowBox[{"L", " ", 
           SuperscriptBox["W", "2"]}]], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
         FractionBox[
          RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
           RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          SuperscriptBox["L", "2"]], "-", 
         RowBox[{"\[Sqrt]", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             FractionBox[
              RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
               SuperscriptBox[
                RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"cv", " ", 
                  FractionBox[
                   RowBox[{"4", " ", "d", " ", 
                    SuperscriptBox["y", "2"]}], 
                   SuperscriptBox["W", "2"]]}], "+", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", "x", " ", 
                   SuperscriptBox["y", "2"], " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                  RowBox[{"L", " ", 
                   SuperscriptBox["W", "2"]}]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                 FractionBox[
                  RowBox[{"d", " ", 
                   SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                   SuperscriptBox[
                    RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                  SuperscriptBox["L", "2"]], "-", 
                 RowBox[{"x", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
              SuperscriptBox["L", "2"]]}], "+", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{
               RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
               FractionBox[
                RowBox[{"d", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", 
                 SuperscriptBox["y", "2"], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                RowBox[{"L", " ", 
                 SuperscriptBox["W", "2"]}]], "-", 
               FractionBox[
                RowBox[{"d", " ", "\[Kappa]x", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
               FractionBox[
                RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], 
        ")"}]}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "S", " ", 
           SuperscriptBox["y", "2"], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          RowBox[{"L", " ", 
           SuperscriptBox["W", "2"]}]], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
         FractionBox[
          RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
           RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
          SuperscriptBox["L", "2"]], "+", 
         RowBox[{"\[Sqrt]", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             FractionBox[
              RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
               SuperscriptBox[
                RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
               RowBox[{"(", 
                RowBox[{
                 FractionBox[
                  RowBox[{"4", " ", "d", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "+", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", 
                   SuperscriptBox["y", "2"]}], 
                  SuperscriptBox["W", "2"]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "S", " ", "x", " ", 
                   SuperscriptBox["y", "2"], " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                  RowBox[{"L", " ", 
                   SuperscriptBox["W", "2"]}]], "-", 
                 FractionBox[
                  RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                   RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                 FractionBox[
                  RowBox[{"d", " ", 
                   SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                   SuperscriptBox[
                    RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                  SuperscriptBox["L", "2"]], "-", 
                 RowBox[{"x", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
              SuperscriptBox["L", "2"]]}], "+", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{
               RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
               FractionBox[
                RowBox[{"d", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", 
                 SuperscriptBox["y", "2"], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                RowBox[{"L", " ", 
                 SuperscriptBox["W", "2"]}]], "-", 
               FractionBox[
                RowBox[{"d", " ", "\[Kappa]x", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
               FractionBox[
                RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], 
        ")"}]}]}]}], "}"}]}], "}"}]], "Input",
 CellChangeTimes->{{3.809439443425313*^9, 
  3.8094394438960543`*^9}},ExpressionUUID->"3e5cbd57-63ff-4a10-9d8c-\
8d683914775e"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Kappa]x", " ", "=", " ", 
   RowBox[{"L", " ", "=", 
    RowBox[{"W", "=", 
     RowBox[{"d", "=", 
      RowBox[{"S", "=", " ", "1"}]}]}]}]}], ";", " ", 
  RowBox[{"\[Theta]", " ", "=", " ", 
   RowBox[{"Pi", "/", "4"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     FractionBox[
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
         SqrtBox[
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
             FractionBox[
              RowBox[{"d", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
             FractionBox[
              RowBox[{"d", " ", "\[Kappa]x", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"]}], ")"}], 
           "2"]]}], ")"}]}], 
      RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     FractionBox[
      RowBox[{
       SuperscriptBox["L", "2"], " ", 
       SuperscriptBox[
        RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
         FractionBox[
          RowBox[{"d", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         FractionBox[
          RowBox[{"d", " ", "\[Kappa]x", " ", 
           RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
         SqrtBox[
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
             FractionBox[
              RowBox[{"d", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
             FractionBox[
              RowBox[{"d", " ", "\[Kappa]x", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"]}], ")"}], 
           "2"]]}], ")"}]}], 
      RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]]}], "}"}]}], "}"}]}], "Input",
 CellChangeTimes->{{3.809431809392826*^9, 3.809431819510982*^9}, 
   3.8094318534568133`*^9},
 CellLabel->
  "In[173]:=",ExpressionUUID->"6b09a13e-0cd6-4a3f-a6e1-3df13bf3ebdf"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"z", "\[Rule]", 
     SqrtBox["2"]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.80943182094823*^9, 3.8094318573996*^9},
 CellLabel->
  "Out[174]=",ExpressionUUID->"ac232a0f-2e6a-426e-8667-2e8870abba85"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Series", "[", 
   RowBox[{
    RowBox[{
     FractionBox["1", 
      RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
     SuperscriptBox["L", "2"], " ", 
     SuperscriptBox[
      RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", 
        RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
       FractionBox[
        RowBox[{"d", " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
       FractionBox[
        RowBox[{"d", " ", "S", " ", 
         SuperscriptBox["y", "2"], " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
        RowBox[{"L", " ", 
         SuperscriptBox["W", "2"]}]], "+", 
       FractionBox[
        RowBox[{"d", " ", "\[Kappa]x", " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
       FractionBox[
        RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
         RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
        SuperscriptBox["L", "2"]], "+", 
       RowBox[{"\[Sqrt]", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", 
           FractionBox[
            RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
             SuperscriptBox[
              RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
             RowBox[{"(", 
              RowBox[{
               FractionBox[
                RowBox[{"4", " ", "d", " ", 
                 SuperscriptBox["y", "2"]}], 
                SuperscriptBox["W", "2"]], "+", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", 
                 SuperscriptBox["y", "2"]}], 
                SuperscriptBox["W", "2"]], "-", 
               FractionBox[
                RowBox[{"d", " ", "x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
               FractionBox[
                RowBox[{"d", " ", "S", " ", "x", " ", 
                 SuperscriptBox["y", "2"], " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                RowBox[{"L", " ", 
                 SuperscriptBox["W", "2"]}]], "-", 
               FractionBox[
                RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                 RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
               FractionBox[
                RowBox[{"d", " ", 
                 SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                 SuperscriptBox[
                  RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                SuperscriptBox["L", "2"]], "-", 
               RowBox[{"x", " ", 
                RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
            SuperscriptBox["L", "2"]]}], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
             FractionBox[
              RowBox[{"d", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
             FractionBox[
              RowBox[{"d", " ", "S", " ", 
               SuperscriptBox["y", "2"], " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
              RowBox[{"L", " ", 
               SuperscriptBox["W", "2"]}]], "-", 
             FractionBox[
              RowBox[{"d", " ", "\[Kappa]x", " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
             FractionBox[
              RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
               RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
               RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
              SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], ")"}]}], 
    ",", 
    RowBox[{"{", 
     RowBox[{"\[Theta]", ",", "0", ",", "0"}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.8094290315570354`*^9, 3.809429064662726*^9}},
 CellLabel->"In[90]:=",ExpressionUUID->"198888fe-d494-4203-af74-f8906f0215b3"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   FractionBox[
    RowBox[{"d", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"L", " ", "x"}], "+", 
       FractionBox[
        RowBox[{"L", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "L"}], " ", 
            RowBox[{"(", 
             RowBox[{"4", "+", "S"}], ")"}]}], "+", 
           RowBox[{"S", " ", "x"}]}], ")"}], " ", 
         SuperscriptBox["y", "2"]}], 
        SuperscriptBox["W", "2"]], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"L", "-", "x"}], ")"}], " ", "x", " ", "\[Kappa]x"}]}], 
      ")"}]}], 
    SuperscriptBox["L", "2"]], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Theta]", "]"}], "1"],
    SeriesData[$CellContext`\[Theta], 0, {}, 0, 1, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Theta], 
   0, {$CellContext`d $CellContext`L^(-2) ($CellContext`L $CellContext`x + \
$CellContext`L $CellContext`W^(-2) (-$CellContext`L (
         4 + $CellContext`S) + $CellContext`S $CellContext`x) \
$CellContext`y^2 + ($CellContext`L - $CellContext`x) $CellContext`x \
$CellContext`\[Kappa]x)}, 0, 1, 1],
  Editable->False]], "Output",
 CellChangeTimes->{{3.809429040062004*^9, 3.809429065334628*^9}},
 CellLabel->"Out[90]=",ExpressionUUID->"9397e9ef-e0d5-443e-bde9-aedbbf9e3d9e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"R", "[", "\[Theta]_", "]"}], " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Cos", "[", "\[Theta]", "]"}], ",", " ", 
       RowBox[{"-", 
        RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Sin", "[", "\[Theta]", "]"}], ",", " ", 
       RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "}"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"vecs", " ", "=", " ", 
   RowBox[{"RandomReal", "[", 
    RowBox[{
     RowBox[{"{", "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"10", ",", "2"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"vecs", ",", " ", 
     RowBox[{"vecs", ".", 
      RowBox[{"Transpose", "[", 
       RowBox[{"R", "[", 
        RowBox[{"Pi", "/", "2"}], "]"}], "]"}]}]}], "}"}], ",", " ", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Blue", ",", " ", "Red"}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.809428382367682*^9, 3.809428499826061*^9}, {
  3.8094285337907667`*^9, 3.8094285389831347`*^9}},
 CellLabel->"In[64]:=",ExpressionUUID->"319d8f3a-b984-4924-a3e6-e9da550eb180"],

Cell[BoxData[
 GraphicsBox[{{}, {{
     {RGBColor[0, 0, 1], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6], PointBox[{{0.4475971235050966, 0.05918014256034465}, {
       0.36997237594641397`, 0.5739146189499067}, {0.56326396631042, 
       0.7936143227928572}, {0.06613713481504457, 0.17858333070334242`}, {
       0.4944928521473335, 0.5620167768605726}, {0.5577517868516821, 
       0.8548105910897705}, {0.21414329798319676`, 0.5242105065652469}, {
       0.18002477998077038`, 0.30442836022067055`}, {0.5608911531673142, 
       0.2955615463695591}, {0.7546510416498449, 0.9148981123629869}}]}, 
     {RGBColor[1, 0, 0], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6], PointBox[{{-0.05918014256034465, 
       0.4475971235050966}, {-0.5739146189499067, 
       0.36997237594641397`}, {-0.7936143227928572, 
       0.56326396631042}, {-0.17858333070334242`, 
       0.06613713481504457}, {-0.5620167768605726, 
       0.4944928521473335}, {-0.8548105910897705, 
       0.5577517868516821}, {-0.5242105065652469, 
       0.21414329798319676`}, {-0.30442836022067055`, 
       0.18002477998077038`}, {-0.2955615463695591, 
       0.5608911531673142}, {-0.9148981123629869, 0.7546510416498449}}]}}, {
     {RGBColor[0, 0, 1], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6]}, 
     {RGBColor[1, 0, 0], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6]}, {}, {}, {}}, {
     {RGBColor[0, 0, 1], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6]}, 
     {RGBColor[1, 0, 0], PointSize[0.012833333333333334`], AbsoluteThickness[
      1.6]}, {}, {}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{-0.9148981123629869, 0.7546510416498449}, {
    0, 0.9148981123629869}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.809428440041955*^9, 3.809428452877676*^9}, 
   3.809428500754698*^9, {3.809428534057798*^9, 3.80942853941294*^9}},
 CellLabel->"Out[66]=",ExpressionUUID->"8d19f8ef-95ce-486f-93bb-192492bdeebb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Kappa]x", " ", "=", " ", 
   RowBox[{"L", " ", "=", 
    RowBox[{"W", "=", 
     RowBox[{"d", "=", 
      RowBox[{"S", "=", " ", "1"}]}]}]}]}], ";", " ", 
  RowBox[{"\[Theta]", " ", "=", 
   RowBox[{"0.001", " ", 
    RowBox[{"Pi", "/", "4"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Plot3D", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
      SuperscriptBox["L", "2"], " ", 
      SuperscriptBox[
       RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", 
         RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
        FractionBox[
         RowBox[{"d", " ", 
          RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
        FractionBox[
         RowBox[{"d", " ", "S", " ", 
          SuperscriptBox["y", "2"], " ", 
          RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
         RowBox[{"L", " ", 
          SuperscriptBox["W", "2"]}]], "+", 
        FractionBox[
         RowBox[{"d", " ", "\[Kappa]x", " ", 
          RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
        FractionBox[
         RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
          RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
          RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
         SuperscriptBox["L", "2"]], "+", 
        RowBox[{"\[Sqrt]", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", 
            FractionBox[
             RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
              SuperscriptBox[
               RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
              RowBox[{"(", 
               RowBox[{
                FractionBox[
                 RowBox[{"4", " ", "d", " ", 
                  SuperscriptBox["y", "2"]}], 
                 SuperscriptBox["W", "2"]], "+", 
                FractionBox[
                 RowBox[{"d", " ", "S", " ", 
                  SuperscriptBox["y", "2"]}], 
                 SuperscriptBox["W", "2"]], "-", 
                FractionBox[
                 RowBox[{"d", " ", "x", " ", 
                  RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                FractionBox[
                 RowBox[{"d", " ", "S", " ", "x", " ", 
                  SuperscriptBox["y", "2"], " ", 
                  RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                 RowBox[{"L", " ", 
                  SuperscriptBox["W", "2"]}]], "-", 
                FractionBox[
                 RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                  RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                FractionBox[
                 RowBox[{"d", " ", 
                  SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                  SuperscriptBox[
                   RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                 SuperscriptBox["L", "2"]], "-", 
                RowBox[{"x", " ", 
                 RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
             SuperscriptBox["L", "2"]]}], "+", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
              FractionBox[
               RowBox[{"d", " ", 
                RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
              FractionBox[
               RowBox[{"d", " ", "S", " ", 
                SuperscriptBox["y", "2"], " ", 
                RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
               RowBox[{"L", " ", 
                SuperscriptBox["W", "2"]}]], "-", 
              FractionBox[
               RowBox[{"d", " ", "\[Kappa]x", " ", 
                RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
              FractionBox[
               RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
               SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], ")"}]}],
      ",", " ", "0"}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", " ", 
     RowBox[{"L", " ", 
      RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"y", ",", 
     RowBox[{
      RowBox[{"-", "W"}], "/", "2"}], ",", 
     RowBox[{"W", "/", "2"}]}], "}"}], ",", " ", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Clear", "[", 
  RowBox[{
  "\[Kappa]x", " ", ",", "L", " ", ",", "W", ",", "d", ",", "S", ",", 
   "\[Theta]"}], "]"}]}], "Input",
 CellChangeTimes->{{3.80942908054484*^9, 3.809429248047228*^9}},
 CellLabel->"In[5]:=",ExpressionUUID->"5c0a848d-1991-420a-adab-ed2ae1ff1e59"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJyFnXdAVEfX/1ETY+8llsQCit1Y42M7sYvR2DXRGEvsir333it2TSzYS2RF
xe4siLoqZYEFFli6dAF7V17d3TN375k7v9/+87z5Ou/ccz935syZM4Uao6b2
G5PfycnpSFEnpwJf/ve3UrMGrGsws32N2F4X8/Li2fQn+VqWLvySjVp1qHUt
N29A3W9PixDj+mfsdoc2R1zc/Lh+br5TUecJOaynb+3jPu6PuP7h/KdRh8pk
Mvfq6we4uIVyfWziufElS6Wy5glLBrnHRHB9aM1OMZNGJrEPh2b97uMeo+iX
2r4eUjyO+Q2fOOTLf3N93pBfyu7Pi2T+JX9q5OKWxPW4N0M91uwLZSdz63l1
93jM9eLfvHrp7POIbQiu9ZN7TCrX8wKqnh667g5z96p+YbtLBtd7lirm1aj/
NdZna5WmPu5ZXL9xJ3B8+thzrNnUChejfbK5PvHm46Wt7u5mlXqXbp6Xl8v1
gApTA47ddgPkPHaWbt+X92MFcx6vbjItm3NGfXHXqAu5e9M5Z9SvZx49e678
Y84Z9fQulpF+AfGcM+pu9S44Fatg5pxRL+t99KLrdyGcM+opZ//3tvgvdzln
1DOS2Vz3FRc5Z9Rb1fx7m3HnJEDOqG/q3Djlj3+9ATmj3qTX9V9exOsBOaNu
fFu3fKea9wE5o77PrXH/a+UDADmjPsP8IHrG9WBAzqiz5h6duhYK4ZzPFC27
7Mt7s2c1P7VvO/0x54z6dy+/uzpsTjznjHr+2tONrb0jOGfU99SZtCZ/g0DO
mde/5lPrDWtucs6ox9SPiSrWeTbnjPqHO/WaloYrgJxRfz95rzl03z1Azqgf
qj7wuHtNI+eM+vafP00Z3sfEOaMeXmJR+8CISM4ZdbdvM9bcvRzNOaN+Md+A
a4OyLZwz6ndn3O28dXEc54z6m/BiuxePjeecczxnj/3Cg51+NKp2z3rRnDPq
aT8vLbHmpZFzRr2Aa2SXsYF6zhn1H6d7Ff/n+2WcM+o13w1I7/nqOiBn1MOb
PxzU7eRDQM6ovx+0+WnrjmGcM6+/aIVVruvNnDPqf3UoFz+3TiznjPqDsLQ2
P2xL4JxRb1R6RWL7VkmcM+puLzdXOrUpmXNG/aclP1Udsfkx54x6YAld9Smt
Uzhn1DuX+3ZY1I4UznmMtZ0/Yr+lDbrx19RAzhn1OiWWXjmt8+GcUR87LyJ5
8I3jgJxRL/Q56X77VH9Azqg3KlnELd/aEM4Z9R4PO9ar9iKSc0a9ay/DyrVX
Yjln1I8PLj3eZWIi54x652ln71w9lsw5ox614VbJdRtTOGfUL37be82+H9M4
Z9QfuQwe8XJYOueMeulpD8IPuWVwzqjXHLj+h6OJGZwz6l1cJ7p/WzuTtGc/
ljbXadqbutdJe/Zjffpv6Xu/wlFQt2c/di+44ubVfe6Cuj37saIrW7UJ6hIK
6vbsx7akbDSsbxNF2rMf88mZ+mTl+njSnv1Y7Iq/t6fsSSLt2Y9dc4153rJi
CmnPfmzfmr8H3eqYRtqzH+v0Kef10soZpD37sR1lupVYczCTtGc/Nnx7k/CI
oCzSnr88N3XRyvlnn5D27McCTgX1nt08m7RnP7Y3IHtqyIRswtmbNXf3WB5T
dz/h7M3+SStReE7STcLZmy1p9c+96MggwtmbnQ7+PHnEmwjC2ZuVTx9e7duY
WMLZm1XrXOPjrKJJhLM3C5x26NqW8MeEszc79azit5G/phHO3qx44U6VB07J
IJy9Weq77Gal2mURzt5s8ZYHG0tefUI4e7Oy4SuGDInPJpy92U5fn8g33jmE
szdL3vj5f7lNcwlnbxbhlevTbXgu5+xk/y2EY+lLfl7ZHjmjXqft9cFjzvhy
zqhveNAic37+EM4Z9SoPbkc8XmvmnFH3uNLn2fIx8Zwz6r8cuhvjFahwRr3z
N//0u7czhXNGfW3ai31FC6VzzqhfytievcY1k3NGPaLpj+vghcIZ9WVZA4+2
nZTNOaN+9k7U3NVbczhn1N/2ad2uxohczhn1Ho9K1asYq3BG/cXbJ//7ucBT
2p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p5B0p6B
tme7PwGJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJfwaJ
fwbqn+3jI0jiDZDEGyCJN0ASb4Ak3gBJvAGSeAMk8QZI4g2QxBsgiTdAEm+A
JN4ASbwB2vFGKEjiZ5DEzyCJn0ESP4MkfgZJ/AyS+Bkk8TNI4meQxM8giZ9B
Ej+DJH4GSfwMNH62z19AMh8EyXwQJPNBkMwHQTIfBMl8ECTzQZDMB0EyHwTJ
fBAk80GQzAdBMh8EyXwQ6HzQPh8HSX4DJPkNkOQ3QJLfAEl+AyT5DZDkN0CS
3wBJfgMk+Q2Q5DdAkt8ASX4DJPkNoPkNe34JJPk6kOTrQJKvA0m+DiT5OpDk
60CSrwNJvg4k+TqQ5OtAkq8DSb4OJPk6kOTrAPN1pwuPd6/t5gn+dZbWjvGJ
ZQvu/fftPwWfMuSPen7zxM6juz5jteN3vJgck8PL+39e9fLsLj3/jqiPMX4b
MvemL6/fNi7cYEsq+E3/t+RGrtv8mCc7vLR4m3t/6ci4fINV8ahypvbU/1hu
gY3tr7jf4PVUyeq/d0+QH6CO9aybOwlimz+A1fmaHHWPucfLvw6Lym7xWwjX
sfz5IVc+dpttgrLLq57Mywvm5e/vNoa4bTZzHcsPPf+gds9TMdDHaVV4dw8T
L5+a7/brXS7xXMfyxeM7BPlXSoTv9fMjt7tE8fI9xuZOLrchietY/sa3k93X
Fn0McUunRkX7xPLyn9fELijUKIXrWL7c5WaNZp9OhdBD3tnbXRJ5+VmBW0Y2
WpLGdSzv2Taq564X6eCz9L8pPu7JvHz/rtP/3Lwgg+tYPqXxvm9yMzJh7/BT
udE+Kbx8k/N7jzdwzuI6lu879tzW9ZuewCI4Oi0vL42XH9xm+Jyy8xQdy99q
39h1ckw2/FXt4DNnt0xePiYno6DbfEXH8qY5wwscjMiBjnl7Z3T3eMLLn6iz
dIuptqJj+Tut/je09pJcwHaL5Wtfdu50a1kO17F8Z6/A0cVCc2n7BNo+sfzE
MnNXXau7gJF2CLQdok7bG+q0XaFO2w/qtJ2gTtsD6vS7o06/L+r0O6JOvxfq
9LugjvzVcYsnc+oSH3DMkkv5A+Vv/16AfoPwB8ofy6N/IH4A0A+Q/g7Y30m/
BuzXpP8C9l/STwH7KemPgP2R9DvAfkf6F2D/Iv0IsB+R/gLYX0i/AOwXhD9Q
/lge+wXxw4B+WB3n3wDfOk7Bg7bk0HEEJOMISMYRwHEEdRynggNHb/h2yEqG
9eN6U99zw0785P+ckfKMlsd80eec0nee5Z0g44U3Cy69KGtl0D3ST72Z04vi
B450DSP91Jv1uND6dP0l0aSferMLPx7q/WZNAumn3iwy+MmijwuSST/1Zu2a
J+9rUIX2U2/m8y4oacs42k+9md/FJx71RtB+6s3Gv978uOC3tJ96s5/9/ErV
H0T7qTebuD2x98H+tJ96s4zG0eZxn3LIPO4Gw++r7qfe7NOqiMQt/ZV+ivmi
5+3W7Rr++QLnjHqbzlsWHM/3kHNGfXLZO/nrRSv+EPW2J4a2PFfUwjmjPtyw
PetiD8Ufon4mO1t3uY3iD1F38nA/lWRWOKM81LKlRMeayniHerm0P3+MqaiM
a6inp1Utc/mawhn1dwfe1Iz8Lodz5vWc+HZ99/y5nDPq758MXVjqtNLvUK/S
Lq9xy4903PEGSbsFSbsFSbsFSbsFSbsFSbsFSbsFSbsFSbsFSbsFSbsFSbsF
bLekfQJtn+hP0G+QeBUwXm1V7l1oHTcPeL4idbJ7TBz70Hpn3eufn7Hqe0LL
+rjncv231/f/KP/NBV7e9lwPtqPhrMMhg48Alkd9bUTD89Pe5VIdUMd6bP3u
LJzt4HbB/8Qu4rc9YPOr3UU+fsildoLETkA70Q+j/e89mrg3OvKckecyyXMZ
Phfrx/JDPl9uvvg4fS9P9tnQ9u9XUbmUD1A++L60HvTnby6OXrty6jRuJ37H
n5/+G9xnzAv+HfF9Jyz8o0tiXW8g5ZmkPMPy6rjCg0V3r/Sxc90hTJ3P8WSz
+/UaO719NmyvmFbSxS2V83GtWuNSZOFskv/xBEl5wPKoox+YXfHvjRXKZ5N8
kSd71L/ltQV/58CsN4nbunuk8+fO+OtS8Xadcmh5kJQHLI86PndLrJv/r7/l
kHyUJztwecKTiOa5MDjSUto9JpM/N2Fw8zUv6uTS8iApD1gedXxuyJi+1UOb
5ZJ8lydb3HdWy83eudD6SqTHdpds/tyfhg4fkP+GUB4k5QHLo47P/Zi/VYTu
rtLeUP9uYNLmN/mekvjnLCz/dXHNolM3M9KPAPsRabeA7ZbUw2g9aCe2N9KP
APvRyrWj+/i4p3EOPfut0DldyKY6UB3f6/CI53Ncb2bD2HHDQ6J9Mng97SYc
8N6sz6E6UB3rKfTT0iGrHuWAW7ch/fLysng9kVFNpk5dlEt1oDrWs+nksY8t
1uZCA9eBYc5uObyed93WVf3vsaAD1bGeg663d3TKVb6f7ZfA8P+KXXqmmQtf
B6S6n6AHsKW9lHVAWj5U0E3Vdv2irAMq+iNrPTGCrl4HpPUnCXpUcLXryjqg
oodbn5sq6CFTi9xX1gEVPdBqT5agPyj5KkxZB6R25go6/ixfXu7rfiS1/d6g
rfsJOnLWLh8q6MiZ6siZ6shZu/4kQUfOVEfOVEfOVEfOVEfO2nbmCjr+rlrl
CIGztu4n6MhZu3yooCNnqiNnqiNn7fqTBB05Ux05Ux05Ux05Ux05a9uZK+j4
2/nFyXzdj0Q5a+t+go6ctcuHCjpypjpypjpy1q4/SdCRM9WRM9WRM9WRM9WR
s7aduYKOv3hrO38kcNbW/QQdOWuXDxV05Ex15Ex15Kxdf5KgI2eqI2eqI2eq
I2eqI2dtO3MFHX+7rfz9BM7aup+gI2ft8qGCjpypjpypjpy1608SdORMdeRM
deRMdeRMdeSsbWeuoONvv1X3Fjhr636Cjpy1y4cKOnKmOnKmOnLWrj9J0JEz
1ZEz1ZEz1ZEz1ZGztp25gq7+Hb5JOWvrfoKujuto+VBBV8d1iq6O6xRdHdfR
+pMEXR3XKbo6rlN0dVyn6Oq4TtHVcR21M1fQ8bfBxh/U9nuDtu4n6MhZu3yo
oCNnqiNnqiNn7fqTBB05Ux05Ux05Ux05Ux05a9uZK+j422LzJwJnbd1P0JGz
dvlQQUfOVEfOVEfO2vUnCTpypjpypjpypjpypjpy1rYzV9DxF2kbHwXO2rqf
oCNn7fKhgo6cqY6cqY6ctetPEnTkTHXkTHXkTHXkTHXkrG1nrqDjb5st3hM4
a+t+go6ctcuHCjpypjpypjpy1q4/SdCRM9WRM9WRM9WRM9WRs7aduYKOv0u2
+YvAWVv3E3TkrF0+VNCRM9WRM9WRs3b9SYKOnKmOnKmOnKmOnKmOnLXtzBV0
/Jlt83GBs7buJ+jIWbt8qKAjZ6ojZ6ojZ+36kwQdOVMdOVMdOVMdOVMdOWvb
mSvo6l+CwFlb9xN0kq8TOFOd5OsEzlQn+TqBM9VJvk7gTHWSrxM4U53k6wTO
2nZ6wpSv9H1imRP5Uf3elcYV3WNyhPJYP9Wx/sk2Xfi+VMf6ZbrMfrsu2El1
Ul7gQ59rK+8BV6zNM47X4180sNXXPDzVsbytOccBLU91/Mnq17bfQ2o/rZ+U
F74XfS7+ZPZrP9eLnz9NrDKpmblZhn3fI+Praw+Gb8/y25HLdSz/3vju+OKW
KSz0fvDKvLz7vPySvgtzS13M4jqWn3c87MwP8xLt9QTz8st85q0dXDqd61h+
YPCH6eOexbCohSv25uWF8fKuAcH1PM4/5jqW9/i++bY508JZiPW5kbz85Lu/
9r25IZHrWP7W6/91YNFB7EHZH6bm5SnntQNab031/DWW+ZLz2vPt+z+xPD/v
XORhnWbGO7w86jn2fbmx4TGeeXmJvJ5dFWu/6d41jOv8HPHY+9/cerHA/l7J
vPzfrpUr/VU+iOtYvnn9l+eHDDkH4TXqbsnLS+HlNzz93mPNvnsMdSy/pG7Z
2s/L3AQbhzRePjvIq+u77/UMdSz/ttfM4VXy+UOg+5z5eXnKufLXqyb07O56
maGO5S90HnR46ycD2Pgo580j8uauM9U6xVDH8qP75SSlfQ6Au9fujM7LU86h
Xwnz21Z36Q6GOpb3OdWn0oH8RsB2i+d51xXbFPi0bwJvn6hfOnTsbadkM2+H
qHe+0rLhnsMhvL2hfr5Swd7Hrtzl7Qr1gFXlhnn19+btB/UUY/6GvTruAGwP
qA/u47Tz6KdrgO0B9bf2/fD43VGvtul8nwUlgwG/L+oucZVLJHcO498X9YTy
0bVHr4rg3xH1wpn3F7h1jeLfi5+PXlmq9D8bYvh3QT2ytyV3dN9Yzh/1Bka3
qv/tj+Oc7ecRWMRTr9+hSijnjHrfSykefcrd5ZxR35JvxsiXV85yzqhPi9+5
7OfnpwA5o77Rs9OcUZP8ADmjvnr2gfseBwM5Z64PzJ77fVYY54z6D/bzHcgZ
9UWlx8Zu3mnhnFGvd6DmM5fSCZwz6uyIqVfTfYmcM+pZu7zWzUxK4pxRHxpQ
olb2k2TOGXVjZsjxo1cfc86oD/pz6OYDXVI4ZzzPey9wVccpLW9wzqg/vX+6
yEnjSkDOqF+q8j9ddtPbgJxRn9KiXcvq7x9xzqgfm15x4KbcMM4Z9WZnZtb5
3+gozhn1lKf7PasNjeOceT3280rIGXWD/+O2Y4clc878nLXZu7OpdArnjPra
IfoCM9emcs6o6ws+/NT1dhrnjHrvRoV9Bvikc86ov2zQ1Ovw1AzOGfVWfadP
apyZQdqzHzM5ZaaY++0EdXv2YyN6+AcFN/QFdXv2Y1uPt4aZ4UGgbs9+rNzz
pffP6sNJe/Zja10GT7m/N4a0Zz827UHdkA3zE0h79mPtrg68GpyWRNqzH7tq
P3+nbs9+7N3SpVt6fkol7dmPjTGtGbT1WDppz37sVteSwQWKZ5L27McuVb68
8HzLLNKe/VivP/bE76jxhLRnP9b/c8/FVwOfkPbsx0ISEiOqt8kmnL3Z9AV+
etP6q4SzN4tfGrilUdhDwtmb/TKxVv6QpibCQTm/rObgzfIaXNp2tEEG4eDN
tg89M/HfoEzCwZv5Hq5b8UGTJ4SDN2s8SF/p6/40tB/jpBeWp1kN825z+1H/
sUpE7K8Fgrj9qN9b8s/EvXfDuf2or7GfC0b7UX/86fvrLVIV+1Hv8tx9yObV
WZQnSHiChCdIeIKEJ0h4goQnSHgC5WlvJyDpdyDpdyDpdyDpdyDpdyDpdyDp
dyDpdyDpdyDpdyDpdyDpdyDpdyDpd0D7HZ7TlIwjIBlHQDKOgGQcAck4ApJx
BCTjCEjGEZCMIyAZR0AyjoBkHAHJOAKScQS0x5FQkMRFIImLQBIXgSQuAklc
BJK4CCRxEUjiIpDERSCJi0ASF4EkLgJJXASSuAhoXITnNCVxPkjifJDE+SCJ
80ES54MkzgdJnA+SOB8kcT5I4nyQxPkgifNBEueDJM4HGufjOU2aB0CdzvdR
p/N61On8HXU6T0edzsf5eVvt+TXQ+TU/r0rm0ajT+TLqdF6MOp3/ok7nuajT
+SzqdN6K+0gne23OHG9+RvMtgPkWklcBzKuQ/Alg/oTkSQDzJCQfApgPIXkP
kOQ9APMeJI8BmMcg+QrAfAXJSwDmJUj+ATD/QPIMgHkGkk8AzCeo4zQLq921
/NH8czI5zxvj/63k5mFhjSa+P14vPI3znBPSupmHSywbXyZ2wcTBKZxn09bm
nl/zn0dODnUNK5HM1H44jo3e/Pv4kR8SiH+IY/1bb3zl3DqOtNt4Nu7G55/v
pEVznuPseQynx1p5oRhWKr1q+dmLT3Celi5ZAd2/2D+iyojlBbd4cJ57zq9L
3f7Ffqf96ZtDw/vzdtuvYm0na/42Ij/rG7yJt9viy+5U+mr/09elD3Z+tpO3
W0P6iGZf7ff7Lv+wvdE7efvsvGdUqo97JPPZN+998PREpo57zazsEq+OtfrF
cp42zmYW1D1vUIFGZs5zrpVzFHuZ27Zbs7lhnGczK+coNnVV735/Dg3iPHOt
nKPZxlv3a0d73uM8z1o5R7NOHvVnHVvPOM+z9nzFU+JvbeN1JPPr8X5kpW8e
cX9b3co5khn/On7IZWcQ9wMxVs5m1rZN+4b5jhs5TxvnKBbXI6tBgkcI52nj
HMVmr67V1KdsKOdp4xz9Zb78R7UNrqHcDzywco5mK6ZvihgVFMI5r2t0N8A9
JpR1TL9yo8vzMM7Zxj+MzfrETO0GBnDOedZfGPt+X4+Cx074cs42/ib2S7jn
jVujvDhnG/9wNs1S8FF6j+U8frDxD2eNR58qXriTNx/XbPwjWIlfp36f2EvP
x7Vce76iMokfTlv5h7Iiyxq1LJgdzTmPtvIPYwHjZ2+4n2DhnKtZ+YexeZNe
GWaMjuOcbfxNbE+joFYl58Vzzrut/MNZ7YympUKLJ3DOfa38w1m9Hx6O+sc1
gXO28Y9gNSefazmxcALnvG9j77FuHgGs2PiNR+Pn6jnnUsM27IvxCWR1ag7I
2f7PEc55jfW7BLGdw48MW1z0LI+HP1v5B7Pa16u2blPQl8dpNv5G1iL59tbP
ox5yzjb+ISyxJPvzn8khnLONfwhzPW7euKi5Mk8cZ89XHCXxsM0PBLA3VXOb
XrqaxDnbOASyLSPTXS4HJnPOtn4dxFZNP1W2/unHnHP76wfGfrXfN3yxqdKv
KZxztLV+I5u7vHfb1RdTOOddVv4hrE3FXdWmJ6VwzrbnhrCPTVf0S4xU4rSa
18s1u+J+h/0Su6TUzDtT+fzOxt+fVa5n8drf8zqfd9j432UFC9T2NSYYOGdb
v7jHVvm0rTwgMoRztrX/+yxfcv2cZ/cjCOcH7LvrcU/dOsaQ9vyQPYWkFqO7
xnPOTyV5FVu7vcNmmmM6n1mrzO9sfPxZ6eBvOpS4lcY597FyuMt6F9fnjL2S
zjnft/K/x3Z6lht4dU4G59zOyv8+G7bz6IKCHzI454sbI/Zt/2J/YJ9dYwZ2
zuSc6w8rHej8xf6L/b2qnO6XyTkPCrmY5+ZxiT3448Dqfit8OOfOs+qOnRLj
w15u2u7UKszAOTepeCjAw+UaKxaTVWHZ1VDO4bk973GS5AGirO97ie3+2HLW
r8/TOQebH/Nh8x88jwgaquQBdFb7r7H9m4rOHLMui3M42qin09dzpo1SMzd/
PdfMx5eZzx40cFvBZtY8NabbHiWvMqhL8GdXNw/2TxPnc2n/BHL7i4Uc33vN
/QBrUNgYmzOf5lW23aR5lSEV/2vm/KV+ryFTN2yIVvIYk6y6ByvQp3jvPVOU
vErRjCn7P3353++Ta5xY53uN29Pk6MrAS+5noXFA3dlDCwZwewYN2+s0OeYE
nF3a+HFgecWeTElepYDVTh08n5JV53hvxZ7a1v5yFqY/+XhwadkszvN363c8
AXmDIktN2qPkVaY3ar+vlpsnfGw83XpOH+2/buXvC98PnJlZPP9hbv+aWT8H
fv7yv1MbHui/paQ/t39fiO/YaJ9bMKpExpMqm0K4/U/s+YRrpF/Ms/YvXxjz
XYu9+/qmcfvzWd9LDy9HbTixpkcGt7+ytV/fgk614F3+/Ep7cLW+7w3Ynt5t
kmN7aGJr57Co85YjYdWucP9se68H0KVbgYPNyhzn9ne29SMY/VOTQZVK3OV+
I8DW76BrxEjDuFTFbwyw9VOof7Fj+Ei9mfsNm1/1h+Ir06O+KR/P/YbdD8DV
Ut5TGs5Q8kJ/k3u61PPoh/Db5HVrCoUp+Yr5Nr8E+2ObDxn4TslX5LdyM8Cr
HSUfl4xN43w22fweJCyZ6NJuieI3Ktj8JMCLj5WTLJncbxy2+VWYH51xr8C7
LO436tj8MAyKO1r7ZKjC2cYhBDpO21gx65yRc95r8/Ow9ceevTol3ObjYKxt
XICqfyxcfWL9Gs65o20cAZeLXSwzflLGwUe2cQcOeV7ctigtmHPubxunoPzA
FY1T70VwzrZxPwA6HfHacqN0LOecbc8DVCPxhn3chB9H9n32LDaWc7a1zxBI
Kp1dqvPARM75lm1cBt8NT9otmJvMOdv4GyHr3ocLhwcq4+Bm27gPzeYbDt7M
TeWcK9riBFjnNLVFWJd0zvmQLa4AjwU9TmQMVvJCpWxxCByvUapVTEAc52zj
Hw41F14ZHNgxnHPeZ4tzIHzg0slr1xl4XGfjb4Ii3gl5B9afJ/O7MLj5uPSc
q3/oSP4tDDb8Oy51cMo9ztkep0E5/8vGbZ0U/3/angf4TOJnexwIKyK3BHdu
HMI5N7fFjXDubOaYMWsiOGdbOw+H1OzN7wb2i+GcbfxN4Jb2e/8aO5S4zsbf
BCVqjf5hwrFEzrmbLe6F7a9eXb/2v2TOeaMtToZfzWGP165/zDnb+ns0XNyy
pOC7sulKXGeLw+HRyJdOxfOSOOeBtrgdxl6Lqx88ysI52/hHQasnHfoVHKTM
U2z8zVA513PReK+7ZB4dCYMWdQtzb3+SqfOckXAocI9PYuoFkueMgXiSr7DP
a6BVk2nNvz+4j3O2xSfRsMG4v8+0729zzi1s8yYo2KNDQTA84Jxt/KOgdtfd
n15fVOYpt23zMthdvYLXf6/COWfbeGQGl3XvfH87HcU52/hHwojvSgxPCbJw
zmv7fu75ZT4LQ1pmTS9QV8lX2PjHwc5727LKv3rCOdv4x8Hmx9Or+Yelcc62
9h8L619XrtTqQxLnbOMfC5V31yxvjrBwzjb+Fkj+9XSvS91NJF8RA90LZ61+
vsfA54PV7fmB2SRfYZ+PQ+O9u7pPSDLy+bWNfxzUq9Tk34L/+fP5tY1/HHz+
Y1D3GVMv8HyFjX8sjNi8P3Vc1DbOeYEtnwAX1twOWL3nCufMbPkHmFP6p8vV
hvhTngx5Iv9Vdv2fT+WGLa24jX+XAvb8RtrzfaPh2SM67jP1uM/jGUbjGXs8
wDAeIHEOo3GOPU5gGCeQ+Idh/MPzUbbxnSUtnTv+6307qJ+2x4FlV7e84qiP
tcUzrJhHefOvp2K4Pscap3myGzUHPv+qYzspaYsr2JWc0MP9zsQq8y97/Lln
10Vdk9A4rne0xVGsZuGuzpe2JHC9ufV9D7DEwi3vF9AncP9pj2fYs1kDK09y
TeS6wR733nYZpfPvkcR1Wzxzlk0pk+e8pGgy1yfa40z99kb7D0xO5n7YHkex
rsb0X6a0S6ZxF78HG8tH2+PwkXEL6/yX9ZjrNv+pY/6fKvVe1yOFxp98nRTL
j7LHw11nvPvmeZQQ1zGM60i8ymi8inww3iNxLKNxrD0OZBgHkviW0fjWHh8y
jA9J3Msw7sV+t87ePm+WmvTvuRKK3tE+3zl6bGb/QA9Fb2Fvt2eMExoG7s3h
elf7/GJPzP64XY9yeP9dYO8v1UzdG7lOyOZ6H/s8K6rLgFqpk5Xy39v70ez/
TW+49ftcrq+zz2tW1lpnPS+P/fqSvf9eu8lmrF2bzfW/7fO7W07mk6MKKuWf
p9v6dUbus90+Q3LpfAok8ymQzKcA51Ok3wH2O9JPAfsp6UeA/Yj0O8B+R/oF
YL8g/QiwH5F2C9huybyvLc77SL8A7BdkPgiS+SDgfBDbZyH7e7Wr1+r8T4+U
djjJzufsjYfNHduhvf0Ath/S3gDbG2kPgO2BtB/A9kO+O9Dvbs8DgCQPAJI8
AGAegPhnoP7Z7s8B/Tnxt0D9rd0/A/pn4j+B+k+cP6K/JX4P0O+RfAWcJP4N
56foV0keAyR5DJDkMUCSxwDMYxA/A9TP2P0SoF8ifgOo37D7GUA/Q/wAUD9g
9xuAfoOsgwCug5D4ATB+IPEG0HgD11lwHyZZt2LqdSvl/rRV/UpN+XoPlXrd
xJt5NFxZdH91xQ+g7vV+oa7VnSSyfu3NBh0f0uB17RSyjuzN4muV+nNzS4Ub
6nH6ffGNzTlkHdmbJQz3dq3YJpe3Z9xX4xr794ezRS3cTtQ7t3tY+cpjxU7U
xw4Zet17leKXUJ/5UT8qMEWxE/XGi24sSE1V7ER995aeBVquVezBfTISbiDh
BhJuIOEGEm4g4QbITb3u78k2NSu7pcC1J9RPMvSTqJ+y+rcVjP2XN/Fe4hNa
D9B67OWBlkduxrM3Isek0f1FniwstdJPjn4Y9YePOrUOv5ZD/TZDv436zO4/
X13X4O/bL//T1/t6zxupHyT1A63fXk97Wg/a/+xSswZfdTV/T1ZvZMGzS/7I
pTqgrv4unixv/Mlv3a8LOqCOdjbM2DD+xy/8F07bVWdSYg7VAXV87gCnqkHV
v8QnY6q8nes4Htl1QB2f62PP33Z/V7hWUoKi59v0fJz3l/bQ6sin5v8+EsqD
pDzQ8sht2OEyfzdMVcY77ftVmOR8BBPKq/fpJQi6dv3BkvqDxXtmVP4kQdCF
e2ZUfiZB0IV7ZlT+RymvjosShPK0Hiwv3J+j2peYIOja75ssed9k8b4dVb9O
EHRtPmkSPmni/TwqP5wg6No8Ne5Nsuu0vLp9Jgi6dvvxktxXwwQd26F2+WDx
vh17uxLu1bG3H+H+HHt7oDq2B+GeH/t3135usnjPj/07atuTJt7zY/8u2naK
9/8gZ20+XpL7apigI2ft8sHifTt2zsK9OnbOwv05ds5UR87CPT92ztrPTRbv
+bFz1rYnTbznx85Z207x/h/krM3HS3JfDRN05KxdPli8b8fOWbhXx85ZuD/H
zpnqyFm458fOWfu5yeI9P3bO2vakiff82Dlr2yne/4Octfl4Se6rYYKOnLXL
B4v37dg5C/fq2DkL9+fYOVMdOQv3/Ng5az83Wbznx85Z25408Z4f3B+iaad4
/w9y1ubjJbmvhgk6ctYuHyzet2PnLNyrY+cs3J9j50x15Czc82PnrP3cZPGe
HztnbXvSxHt+7Jy17RTv/0HO2nxwfkrvq2GCro7TaPlgQVfHXQ736qjiK4f7
c1RxlKKr4yiHe35UcRF9brKgq+Mcak+aoKvjFmqneP+POg6hfLwk99UwQUfO
2uWDxft27JyFe3XsnIX7c+ycqY6chXt+7Jy1n5ss3vNj56xtT5p4z4+ds7ad
4v0/yFmbj5fkvhom6MhZu3yweN+OnbNwr46ds3B/jp0z1ZGzcM+PnbP2c5PF
e37snLXtSRPv+bFz1rZTvP8HOWvz8ZLcV8MEHTlrlw8W79uxcxbu1bFzFu7P
sXOmOnIW7vmxc9Z+brJ4z4+ds7Y9aeI9P3bO2naK9/8gZ20+XpL7apigI2ft
8sHifTt2zsK9OnbOwv05ds5UR87CPT92ztrPTRbv+bFz1rYnTbznx85Z207x
/h/krM3HS3JfDRN05KxdPli8b8fOWbhXx85ZuD/HzpnqyFm458fOWfu5yeI9
P3bO2vakiff82Dlr2yne/8Pz4Zp8vCT31TBBR87a5YPF+3bsnIV7deychftz
7JypjpyFe37snLWfmyze82PnrG1PmnjPj52ztp3i/T/IWZsPxnX0XhEm6CT/
JnCmOsmnCZypTvJjAmeqk3yXwJnqJH8lcKY6yUcJnLU5eNnXxSxMrTOo9dWd
eCg68uzxVXah9/kEC/f5IM8dVr+k3Bujzhcpujp/GM915BkryR/mJ/YjT1di
P/LsSexHnjOI/chzL7Efed4i9iNPm52RAk8bZ7PAs7bVTrPA08Y5SuA51Wpn
lMDTlj+JFnjaOEcLPK9J8m9xxH7kWYDYjzzrEPuR52/EfuQ5i9iPPPcR+9EP
3Cb2I2eb/WL+zcY/TOBs3wcocLbxNwmcf7XaHy5wnma1P1zgbOMv5jl3SfJv
14n96rxQmMD5G2I/cq5H7EfOfYj9yHk2sV89jxbznLbvGyBwtvWXQIHzDet7
BQmc7ftgBc62fmoUONv6aYjA2cY/ROCcKMm/1SP2I+fZxH7krCf2I+eCxH7k
XJ/Yz88NEfuR8xxiP3JOsNp/R+Bs4+8vcLbxvytwvmm1/57A+VvrfxkEzrZ+
+kDgbPN7DwXOeyX5t0RiP3JuQOxHznOJ/cjZj9iPnEsQ+5HzH8R+5OxJ7EfO
Da32XBI4M+tzfQTO/az1XxM4p1jf94bAeZ61mlsCZxt/vcC5t7V+X4HzQUn+
7SdiP3K+R+xHzn8S+5HzC2I/cl5P7EfOpYj9yPkPYj+Ph632rxA4X7LqHgLn
z1Z7DgicT1jLewqcA6zve0Lg/Mxaz1mBc1Hrf+kEzrb/OiXk354S+5FzKLEf
Ode7oraft2diP1/fJ/Yj5ypX1PbzfTLEfuScYz2nptwfg5wf2jhwHTkftz2X
lA+GJTY7hXj4gu27CPHwWBsHIR5uaeMmxMNrJPm3dGI/cr5B7EfOW4n9yHkU
sR85TyL2I+cyxH6ef3NW28/3PdraucD5jdV+JnAebetHAucQW78TOLe39VOB
8zlbvxY4V7L5AYHzJkn+rROxn+//J/Yj5yHEfuR8h9jP93sQ+/n6CLGf7xMj
9qvznA8Fzjb+DwTOH2znNAXO3rZxROA83jbuCJyr2cYpgXO4bVwTOIdL8m+b
iP3IuQOxHzm/Jvbz+zeI/ch5OLEfOZcj9iPnR8R+5DzJFocInLvZ4haBc01b
nCNwfm87pyz6DVscJXC28Q8UOP9oi9MEzlsl+beJxH7k3IXYz8+DE/uR80ti
P3I+RexHzsOI/ci5HLEfOdvsF/NvNv7hAueutrhd4GzjbxI4f7Kd0xc42/In
YQJnW/5KzHNelOTfthD7kfMEYj9y7kzsR84/EvuR81tiP3IOI/Yj5/PEfuRs
sz9a4GzjHy1wtrWfKIGzjX+UwLmGbZ4rcP5otT9S4GzjHylwjpTk37yJ/ch5
M7EfOY8n9iPnjsR+5FyV2I+c3xD7kXMosR85x9jyMwJn22vFCZy32/InAmd6
fzJytvGPFTjb+FsEzjb+Yp7Tdn4/XuAcTexX55PjBM5biP3IeTyxn+/TJvYj
56rEfsJTiPeSJLrN34r7vj4RDlj+tURPIhzIfjPBTrvOnztq1aHWtXg8Z2HX
Tvqu75qewf8eJeqGxZctg6/ksNsd2hxR4hILm6erVbLqiBTW07f2cWUctbD4
9Ws2ZdRPZO7V1w9Q/L6F+ZZ4uaz3nmjWPGHJIMVPWVhQNa/wg0vC2IdDs35X
+pWFFWvh3GRMlYf2fePxXF+2oFmLZ6VvMf+SPzVS7l23sO5vqgdMqniEncyt
56Xcu25hf5aONHe86sn/Hivqg34vvT/o+FX+91JRr+FU4frdU37875mibn77
McHgdZ//vVHUa/VIOlJ8/CNQ8zSz5hMKLz/0PJHwNLMq+TPyvdelEp5mtvNC
gd9WloohPM2sXqn5f3snhxKeZjbTp9byhbfuEZ5mtqx8g91DC3oTnmam/5R2
tUi7A6DmaWYHGly8+kPBW6DmaWbfHX9+5efeBlDzNLPZa1ZOrjrWSHia2ajy
dXZV/BRGeJrZ0x3dHxx4EkF4mpmhQOUFV5pHEZ5mVvVsUoX54dH87w6j7rHs
aLHcoBjC2cRuv/ppzc9jIghnE0u+s2PkMK94wvlLebjbrPiaR4SziQ05sW30
05pXCGcT8w9uHD7uwF5QczaxnUfa9WXj9aDmbGIvP1UIODAlgHA2sZvFR+m2
eoQRzia2wNOyrFlXM+FsYq9f1gnq1s9COJvYpF+bFI/xiSecTcwypo/50/8S
CWcTS41YXc7SOYlwNrEN63fPKPkxiXA2sbpnjtU5NDyZcDaygntP/+/C4XuE
s5FFJZWo+XmaiXA2siKh0Sudb50gnI1s/rer91x8fBHUnI3M/LlGUP/OBsLZ
yFZ3uVJ65NFQwtnIfs43LSlhkZlwNrIzbnfCrpyPJZyNrEaJao0XVE0knI3M
+fJ3i0KLJxPORta4Y1CRyWcfE85G9vbxunK/vUohnI0sf1KnkKVZqYSzkZWv
Xm5eoS1phLORpS2Nb59rSSOcDaxB79EfezQ/TjgbWGz8W6cFve4TzgZ2+1Kj
qJx7PqDmbGDXzqSv6eD/kHA2sO+Ojeh+aaKJcDawE20G31n1KJpwNrAVM5r/
3qdjAuFsYD//9rFz0UdJhLOBdZqX8/f7vMeEs4F19y/21CUxlXA2sIDh3Zw9
pqQTzgb2Z76VLd1OZRDOBhbe9fjIvlsyCWcDK+q+IOZC9SzC2cCynEOipg/P
Ipz1rMye2fG9/c6BmqeeGQ8svzjE+z7hqWepA95fbDojjPDUsyrfxG4Y/3c0
4alnkV1qn58yKIHw1LOLo4qF9nZNJjz17HeXejl/HUshPPUstmyH9kcD0whP
PevXvfUn56MZhKeeTa0UNTrdJYvw1LOUmrH/ven3hPDUs8UzC5X6o2E24fmF
w/pPvmUvZROeera1ZmL5ch+zCU8dK3pg0Da97hbhqWN1X5xLXNwumPDUMV9L
zutpdSMJTx0rf3mUz4BicYSnjpVduGTQTeckwlPHujk1Ojs7+zHhqWPDb9fZ
PezvNMJTx1asrNN/4eoMwlPH2uW+qhrRP4vw1LEjMS2dTkU9ITy/vO/ab6eN
csohPHWs2T2//VPDcghPHZt47ZsrEf1yCU8de+E/7P3BJbmUJyBPtR/QwYj3
7hm6aTuJH9CBhDNIOIOEM0g4g4QzSDiDhDMgZ9IfAfuj+n318HOhzX53p10i
76sHST8FST8FST8FST8FST8FST8FST8FST8FST8FST8FST8F7KdkHAHJOAIW
7XEEJOMISMYRkIwjIBlHQDKOgGQcAck4ApJxBCTjCEjGEZCMIyAZR0B7HDHC
d9pxEUjiIpDERTBPOy6CSO24CCRxEUjiIpDERSCJi0ASF4EkLgJJXASSuAgk
cRFox0UmkMT5IInzQRLnwx/acT5I4nyQxPkgifPhlnacDwu143yQxPkgifNB
EueDJM4HSZwP2nG+GSTzVpDMW0EybwXJvBUk81ZYoT1vBX/teSv8oz1vhULa
81aQzFtBMm+FXO15KzzQnreCZN4K2zXnrRbAfAvJq8B87bwKSPIq4KedVwFJ
XgWKaOdVQJJXgR7aeRX4XTuvApK8ClTXzquAJK8CLva8ipqnBRILtViw+kMg
LK64Jno7Xw+zsJ5uHrUnv0phRfdMj3Pm6zcWtqp3iw7XfRJZr42NnkXz9QYL
a9+586sXe2JYuV9dXji7KfmoCttq1eo+0cRiilR+NZnncy3s3C+Na981PGIV
jy/+5Oym5JcSPE+47n1xAN6vmreku4eSX3Le9m730P0+EDt6Zt7kmHSu1xtc
6NGTAF/Qd56ybLuLkl9q2fpcWsCne3DUZUI+H3clv5TJXPNnxT+E9d+MXhHt
k6vY6dFlZOiFQJhi5YzrUma29J3zht8/mNgSK58Qrr9bHz0zcu9D1iVyoSWa
5/3N7J/x87t2KH+NFbNyi+a6U/T9Kg0LDYEyVj5KnmfEvPsHcoqEwet61WZ1
90jneufbf5zs6xIBUVZumVx3qd9sR/fdZriZWW7Odhclz3O1doHgxBHRcORh
yTeX3ZU8z58dxxjqr4oBr6Oxd7rz9R4Ta+D/S/fwH3eyOX+H3d3O1ydMbM2M
Hh+PHPSBds4P7kfzfLqJ9brTPetD6H0o8exhurNbOtfPHjjfprEuAZ4Z707o
7pHJde+KM4KnRSeCSafPnBzzhOspL9sbv7mQBNe23Zi03UXJk2QV85z1vFmy
3c/guoiRjfv2QKfpuiD7d4ni+u/fViqxa3U4FLFyzuT6jkrr7ztPSoXsOZOH
d/d4wvU5J+tMW/5zGoQMGpcwmf99QyPbkHzv3//p0uBwm3n7u/P1AANLvdBg
QHyGBQq2+97k7PaE66Wrpj708s2EzKplB3b3yOH6yNEtx15qngV1Ln+K/xqX
23QdbH5YtMcG32tQY0jmTGW9WQdbh89aVGVqIHhFhc9V1kd10KXijKHRgyLg
4LmEdsp6ng7m7ZyROei3WBgzOQKU9ScdHKpx6GWh4ERo2CCgg7JeooPVLxMz
ih19DPrLEc4ubsp8of7M2Rnd6mTB0V0hx5T+pYP+IfOKN/rvCayZHVDLnfcv
HQROuh34V1w2TBh4/4TSv3TwcnzRUYk3cqBnCz9XpX/poPWt0vludcmFpuVv
nVL6lw6WJa2eOWpFLqyasa/r1zjbpuvhvt/tk1/vQyvzfFUPZT1YD8drnaia
/2EIGFu1clXWL/Xw7GVy6ITHZtjztmFdZb1ND9GHU14WGxwPf111rq+sD+mh
+5//5n3clgQ3hi6u5OKmzBcKV9szMCohEw5Zv3s619/ebFt9tvMTWF5lZhV3
3u/0YHoxq/3IMtkw5oP7P0q/04Pn7RZpx/7Lhh4x439Q/s6jHip8Ht2n26ts
mFWk+Q9f4117O4G59Vr3/npvar67W0sp668G8C1Vv9qWoBAwrFpdRlkvNMB/
Hzf+0G2KGbZ2XlhOWd8ygP+UHdW6jo2DK/lcSrrw/miAoafGvKjXMgP2J/64
TemPBmhY6/KYnW0yYbFvpdLuvD8aIGjP/2b0z86EUUfKeSj90QC7G5TvPfXX
LBjrGfRCWQ82wqz794d/vXf0fanYDw79FBasevXfsegg8DWGfnLopzC6Q4nU
c/vD4eLJh9+4KP0Uxv3X6cczs1Nh99q7qx36KRwe0jiqYMc0WDhOX1D5O6RG
mHGzQaXb19Og/r/NU5T1URPs8l90wOcPHTz/s16a0n9N0MZStOnwb+6CV6/p
75X+a4JNk2J9UrcmwY6Gkxcq/dcEhtr7at/8Mj91zlhuVNb/zPB8ol+rme1P
srMvKj51dsvhep+M6kPbVo+B9kG787Xk+2MsLK3jp5kzK+YwMs4yHGezt/x0
2JXvs9GzwlcXX/jWcILFPLpS5Brf36NnVeP1i7yi99H5O2tpn79H1EzOVfaR
6Nlf535Z3n3nFfinf4ddyj4SHau1uPJY55q+8Nb6vfx5+U8spvO8149gaN1N
Qcp+CB2bsWDdy07njbTfMex3xC8x9EukPzLsj8RfMfRX6nMEevbcfg8V6b8M
+y/xbwz9215r+7Hw8rofpjx9nZQMteZVaqisX37hnF3V51DNFHKPkHKP34ss
307K+p+OlX/znUd75zT7uJnA6wnrVGK3d49UeHVgbcUYn0SuN1lXMHr2iDQw
TFjfysUtgdcz81WFbfcup5G/O6bc77djpbmze4ySn/yufXDX438p92Whjvf+
nXVbda27h5J/+zj+8JY2gRkw2zqOp/Dyyys1bxfxYyZsqbu0tXuMkpdzX/bX
6pxtWfBHp6CuPu5pvHzkpSDvnhuzYHrhBTe2u6Tx8j9nWf5Ldcqm/pChPyTj
AsNxgfhJhn6SjBcMx4v8ybcfKP1Lz24G7Wq/L1rwqwz9KmnngO2ctGfA9vxQ
/d35PXXkewF+L8IZkDPhCciTcAPkRvo7FLH3d9J/Afsv6aeA/TRU3V8A+wtp
/4Dtn7RbwHZL2htgeyPtB7D9kHYC2E5I3hUw70q+I+B3JHlvwLx3W7X/BPSf
ZN0ccN2cxO2AcfvpwuPda/P9jl/6Xad3XX+fehpyC2xsf4Xvz9OxvNrjWlYe
fx9W52tyVNlPpmOfHq9o9KtHGJRdXvWkMt7pWIN8N+9cNERDH6dV4cp4p2Ob
yiScO3M2Ab7Xz49UxjsduzL0fMtqh5IhbunUqGi+H0LHzm7yvHm7fSqEHvLO
3u6i+IHTbQou3LYhHXyW/jfFxz2Z600/lv/vwIpM2Dv8VG60TwrXXZv9sDmt
9hNYBEenKeeedOzM20YDFs7Nhr+qHXymxMM6FrrnQOu/ZuVAx7y9M5RxVscq
vRw4d88PuVA7fscLJR7WMc+7y39pNDOX8gQJT5DwBAlPkPAECU+Q8AQJT5Dw
BAlPkPAECU+Q8AQJT0CeRY71m9SAt3MdpLu9eDCu2Cg2MaL7tBt8P64OPiS9
n3km4zAUVZdnZu3y7L29PIm3GcbbJSqlL1HiOh3r/HZ3oTWLBB1QJ+s1IFmv
Acl6DUjWawDXa8j6C8P1F9vfW1f2zzhp/hTdVt5PKB/AlvZy3D+jLh8q6KZq
u35x3D+D+iNrPTGCTvfPqOtPEvSo4GrXHffPoB5ufW6qoIdMLXLfcf8M6oFW
e7IE/UHJV2GO+2fU9ij7Z5w0f2YJT7OEJy0fKuhqnmYJT3q+L15Sf5Kgq3ma
JTzNEp5mCU+zhCe1M1dip7J/xknzZ5JwNkk40/Khgq7mbJJwpuf74iX1Jwm6
mrNJwtkk4WyScDZJOFM7cyV2KvtnnDR/Rglno4QzLR8q6GrORglno4QzrT9J
0NWcjRLORglno4SzUcKZ2pkrsVPZP+Ok+TNIOBsknGn5UEFXczZIOBsknGn9
SYKu5myQcDZIOBsknA0SztTOXImdyv4ZJ82fXsJZL+FMy4cKupqzXsJZL+FM
608SdDVnvYSzXsJZL+Gsl3CmduZK7FT21Thp/nQSzjoJZ1o+VNDVnHUSzvT8
Wryk/iRBV3PWSTjrJJx1Es46CWdqZ67ETuU8m7auE/79//1Tyqu/C63fT6hf
/b2UH/mOpP5QSf2hQnn191V+5Lvzf1d/d+VH2gP/d3V7UH50v5DaziSJ/UlC
eXX7UX6kXfF/V7cr5UfaG/93dXtTfqQd8n9Xt0PlR9on/3d1+1R+pN0SnrkS
nrkSnsp+Kvr/R3XinyXtkJYPFXTinyXtR0/eK15Sf5KgE/8s+b6KTvyz5Hvp
Jd+F2pkrsVPZZ+Wk+TNIOBsknGn5UEEn8YaEs0HCmdafJOgk3pBwNkg4GySc
DRLO1M5ciZ3KPisnzZ9Rwtko4UzLhwo6iZ8lnOk5ynhJ/UmCTuJnCWejhLNR
wtko4UztzJXYqeyzctL8mSScTRLOtHyooJP5oISzScKZ1p8k6GQ+KOFsknA2
STibJJypnbkSO5V9Vk6aP7OEs1nCmZYPFXSS35BwNks40/qTBJ3kNySczRLO
Zglns4QztTNXYqeyz0qt+wk6yb9JeFokPC0SnvScYLyk/iRBJ/k3CU+LhKdF
wtMi4UntzBX0h6rzg0q+LiFy6lPH/VeoB1fsUsTFYf8V6nH1i5eJcdh/hXrE
ozc/uriJ+czASUn13R32X/F6VOuSih5dq29dFzcxbxkx+56X474s1EPvtmnp
7rAvC/Wg8hduOu7L4hzG1O7kuC8L9TuXDzxw3JeF+j3VvXZK/i3M+r0eCLqN
Z4igR84d8slxvxa308o5WtCjVeuwZsJZzDeGVnE/7riPC/VgK/9MQX94Y7C3
4z4u1P2LBrbycRfzjRGqe/yU/FjSytAgx/1dqEc534px3N+FuvHOyXTH/V2c
j+qePUUPm36wnIvDvi/+Xr5lDzju+0L9Uen1Ndwd9n2hfnfk55OO+75Qv6e6
h1DJR0Vb+69J0EOt3z1K0E2q+wAV3Wj9vpmCHjDu+jbHfWLcniuNKzrsP+F6
jOpeRCWfY/vuZkE3qu4hdMiP3crKc9xXhvr94iPXOO4rQz2M7JdAPVB1n6Gi
G/72eOW4no76A9W5Zod8hcovKfOgZJVfUvRQlV9S9ASVX1L0SJVfUvQglV9S
dLVfUvQYlV9yqF/llxQ9TOWXFD1Y5ZcUXe2XFN1f5Zcc5vUqv+Qwn1L5JUVP
VPklRTer/JKiB6v8kqLHqPeHEM7iPC5M5Zcc6lf5JYf5psovKfpdlV9yeK7K
LynzDrVfUvRolV9SdLVfUnS1X3KYx6n8kkM9Kr/kME9U+SVFv6fyS4puUPsl
hb/aLyn9Qu2XFDvVfkmxU+2XFDvVfonr99V+iesWlV9S4uQwlV9yiM9Vfskh
Plf5JUU3qPySQ/yv8ksO8afKLznEnyq/pOhB1vhN2UfHn6vyV3QdVowT2i1T
1cPrP6OOu7iu/jnEaernct1PHZ9w3dO671pZF673qPzqCcX0rPndFYsc46u3
VYrfX774BPvVeh4B9/uZ2YCHr5pOq5PMwqz7k+O4ftatzTtd1yvQ07rfPpHr
RcLh6oA7d6HxpLozHOOTf2798qnGziAIs+4vwnvBTOy3Xa1e+GZHsTXbDHnR
/B4rEzt48kSxncVCmJHEFTX39Sh47IQv+8a6nyeO65fnZm04sjIExvSNHuPj
nsh110+GqzXmRED3JuGp0T7JXN97y+d1Md9oqF/aOM4xrqhQdtL16aPjYLj1
HAfuMzGyf0uUeTI3Ipj1sPK5wXVPpypXWy24yZpaz2Xc4/pPQ0rV/v3vbaAn
8cOP16u2blPQF1pY9yHEcv3S1uvDOhSNAdt+/kSubzr+tnDPjHgY+WbZUGXf
iJF1n9n8bmLJJOhs3eefwvUinavUGxqZDK5X5gxzjDfajBjqXunXFAi37ufE
fRoGdunMyT/nH9CzUtZ9zte4Xj0+3W9t/CLYbd0/eZfrntFdjh2q5Asu1n2M
QVzvGtI/avPHYDDTOCS5fs6z+xEwzrrvLpbrx8oUDSzRNBH2xDbp7R6TwPXv
R536Z9iBZFhwq4Fxu0sy17dd3jAgWZcCw/517evjzv0tq7atc+OTM9Lgl8U1
Q6N90rgecHX0WF1COjgP+6G/Y5xTwHlm04IfMui+SsB9lWQ/JOB+SLIPFnAf
LNnPCbifk+zDBNyHSfZPAu6fHN9w1sBpvF8YIGO76V7tz1dYUPntTS28Xxhg
8ucDt47cOgaDvpleQbnvxgDlz9cy9oxJhBKjmm1S2r8BRo3uWOxU48fwrEOj
4jG8/Rvgw5ppeW1+SgUTGb9e7Sj5uGRsGryw7g/k7R9+6H15e4tzwWx319xI
ZZ+VEaburbX4Rq2bzGzt17z9w46Kv/3U+PJ2WGft17ydQ4Mb834fXD0GXOvE
O3ko7RxG6gvVGfE5HooUil7u0M7hY+/nKRMrJ0F2mil/jNLOwe3i9T+TE5PB
SMav7HsfLhwemAIfEqLCb/F2boL+Lptehta2sKFzey3ewdu5CT5lTy57pkoY
a93Gw09p5yYwvPMbnjjtLjNcX3xPaecm8Mk/obVf+kl2rWr1DKU9myB/+RVF
23Y1wi85G2Yr7dkEpS7OnndkVDg4B61+rbRnE0RF/fb7lMgoKHh+2VylPZug
Z8Pc6heOxULG5oVvlfZsgtSprZ3bjkmAADI+lqo1+ocJxxKhmHVfFu7nNMOH
wx97112Ywn48dbbmVL6f0wwvVlxcExSSwGz7VP25DobfXWPfmlm9sAb7lHvT
zDDuxI8Tv3ltZH9a96+GcT21WN6pQi3vsMxTc0OVfZ5muOP/d8xfP5yG3y+1
zFT2eZrBbWwxy7MSvtBmZ5NJyj5PMwx4eXXHb2sfwo+zGjxR9nmaYY7z4zFd
fg+B/ANc3ZV9nmYonlXhysi7JkhpVjMn2kfJL+2Y3FhXZGMkGMj43nDdO9/f
TkdBkrmwoQffl2uB1BIDZ7zul8HyJj0dd4Xvy7VAeOacIb+GP2abs2ImKffE
WaDG1L/67TmbwDZfTr6i3GtmgQUHFzc5cTaKDZgddU25h8sCnyvVjck5Gcqq
tAi+oezvtUBN15NdX+4xsOkLkv5S9vdaoOH4Wz+n/nWdDRgSG6/s77WA/5TW
JTIv7GU/tzaPUPb3WuDmkYLxdYJPQOXKYYnK/l4LdD7TYN6yYdfh07vAUT7u
Sr7I7/bYi75D7kBClCE52kfJF5VZeWVZ1s8G8CfxzAf73wUm54YYnhsi52UY
npch54kYnici52gYnqMh54wYnjOyxQOBvPzsfOaQjRPCIcPa3gJ4+Q7L/Lsd
cDbb/UYYL99/d6nzJX+y2Nubsg4efHhKg9rP4qCAtV1Fcr1b/VLb5m9MoueS
GJ5LIud0GJ7TIeeVGJ5XIud3GJ7fIeeYGJ5jamM916bsN/h2TrmEkseewICM
WW2V76hjc5LP/VL/hxyoVsC/u+P8euOdrR9rT8iGnx9MvaV8Xx07Xa/T7Dsp
OVDl9MT2jvPrya8qrPj6d8MJT0CehBtIuAFyI3YC2knsAYk9gPaQ7w5z7N+d
fF/g31fNDZAb4QPIh7RzwHZuy2uJ+ycjrPlVJR5G/a51vhMn6PHWPEOioCdb
87pK3It6gDVPe0vQ71vnI3GCHr+8/XLH+Bb1mJCL38U4xLeoZ1rnL0oci3qY
9b1uCLrZauc9QTdY7YwVdFs+M1HQLa4pcxzjVV6/NZ+QIuiZVnuUuBT1COu8
9ZqgR1vruSvoD6zfJUjQbfnMWEFPaHhkuGP8ye1fXCHVMf7k9gdunOwYf6Ju
+iHfC8f4E/UPVv7KuSpev5Wzj6DHWufv/oL+yMo/UCxv5RwmlrfO0y2CnmjN
eySI9YR1G+h43gd1W542RdDDZzYd5XhOB/UQa55E3DdVRTX/VfJ7Cdb3vSTo
8db3uiPoQdb3ChD0OKv94n4nm52Rgh5AzltxPlEF2juek+J86s73dzzfxPnM
z+nheI6JP/fB3yGO55U4n0pRgx39OeqBE36Lc/TbqPtb54+H2jqRX4pkX1Oi
ZD+SUbLvKF6yvyhCso8oULJf6K7KfzrkJyX7heIk+4KiJft/IiT7fEIl+3mC
JPt2Hkr258Sp/LySP7yn8vOKrvbzip6i8vMOeT+Vn3fI46n8vKInqPy8oltU
fl7Rn6r9PNdNaj/P9Si1n+f6A7WfV+xR+3nFHrWf5zrx81x/rfLzDuv4Kj+v
6BaVn1f0hyo/76Cr/LyiJ6r8vMN6vcrPO9ij8vMOeUWVn1f0kssc/bySP0xQ
+XlFj1f5eYf8pMrPK3qcys87rO+r/LyiJ6n8vEM9Kj/vsL6v8vOKHqHy84oe
qvLziv5Y5c+VPGSiyp8rulHlzxU9XuXPLcSeSEEPVPlzRU9S+XNFj1P5c0WP
Vvlzh+eq/Lmih6r8uaIHqfw5XX/HdRkL+7lp0mLT6lSm/jtoX/RJA0ts9kti
6r+DZmEN/m1Qd96iOKb+O2gWVvTTnFLXn0Uy9fllC6s84ZRfxOMQpj5fbGHH
dlwcueGsganzURa2pcD+i53K7gD13zWzsH/de/93LcQb1H/XzMIe/7Ey8sf0
26D+u2YWlq9nxy5lVvmD+u+aWZhnvpvT3uw1wF0y3/xoj8PVHMwsouODM/Gf
wwkHM5tcevPWgv2DCAczG9GiSZkSx3wJBzMrN+zA+xJ3ThIOZra/YrXqZ6oc
Je9rZndGj3CpsT+UvK+Z7X46M2TH5HDyvmY2pMy0/jN8I8n7mll2X0/d3b1R
5H3NbGWhcTm7n0eD+r1M7P226l1W9DpC3svEUmHJu76FdOR8uol1TirhV2TE
HXJ+3MSKfIiIHqQPJPab2Mx69xp6rk4g9ptYTruQ5I77E4n9Jramk+vBatOS
iP0mVi6yQ3zb75JBbaeR+d9pmzqhfCCx08im1EovubCcidhpZBHHOuabXz2K
2GNki3JaTzzfK5XYY2QpB8+dWVY6jdhjZPWrfry7c3caea6BGeNbz6/QwkKe
a2BJJ2svbf3FP6rrN7Apf80euk2XSeo3sFLHN48a5ppFvpcOxnpuX/f13Kia
gw7ca/iP79Ulgdijg61r2k0cmpZE3lcH3Rs87NprcA6xRwclVpdfMvxtDrFH
B2sOD1vzdb7sR9Z5N7u09Nhc0p/0Iz3UrN6lfZ8II7FfDx+uftjzvnYksV8P
HwcOSAl6ZyH9Qg8VY6J2/f6Fj7pd6eHo8iUvRkRmkffSQ6PQVR2PsSfkvfRw
8s36b12/zMdDyfps9R63f/2+xF1ipwFKTj+yoPQTI7HTAEsKThkAYRH0u8PW
Kut8D7YVvjv09f93XNWdCcR+A0SN8NsPJTKI/QZIKNJi02mnTNpO4EqBEm36
XRLaCdSYMKpu+7q0nRjh9AW/ydN/8qX9BUJc2hhLthD6C8SmVHtYsJrQX8Av
L3jC7VpCf4HCtwpX3zFQ6C/g+VvKkDsVhP4CB93Z4xb70og9Jij/unnYpT8E
PwOlws8Nq7tQ8DPg7J/v0+PAQOo34O2nB42T5wh+A9pf/f2vg0WSSf1mGDm7
5s457QX/DMtXNd3/dNhR6j9h77ggv+j30cQeCzzpYCj9ao+Bqf9ulIWtst97
Fkv2lRV6Nf35ksUnmPr+fDPb2/5A/nWbk0g9X3T7fXTqesysa+yGzV0L3yfr
O2Y2fXYDj5o7g0Bdv4kZKneYcMMjkqn7r4n92KzBqmrpwSQe+KLb1z3V9ij3
javtMbHM+3EFVp6NJPaY2PoDXd0fdY0h/drE5vTb+urruqfaTiNLLVw0yDnH
QOw0skMri/w59slFYqeRnUkpELKv4mHa/llN+7qn2n4jO2W/r1Jtv5H99Lpb
o9WhCcR+I1u1qGOT6C1JxH4j04dWnzu82GPSr43swJozK7+ue6rfy8AmBE0t
Y4Lz5L0MrPTfTbZ73TtH/RLb1Lrmnvlv/KlfYtsaz658J0HwS3zdU/2+BtbS
fg+q+n0N7H6Aa+zJq4/J+xrY5dL5a00fl0re18AOX7p6eFJkGvVjrE/yq7AD
hQQ/xsp+m9Lh67onGS+YZLxgkvGCvdceL5hkvGCS8YJJxgsmGS8Yjhfq76hj
51x88q/zvUbeS8dK7roa5T+ZxpM61u7P/bsWLDERzjqW71jYqhLPMon9OrYs
9io73f8JsV/HPDc1GPb1HgbSrqCM56fo4zWEdgUJ/UteK1jgP9oeQNIe4Oj0
Iv+svy60B5h44Fjv5pOE9gCv7eu2pP9C+NwGS3ckC/0X2k5eGVrHT+i/0LzH
06nddh+m/RQk/RSOj/r9lGu40E9hW/5Puh93Cv0UCuyBdV3KCf2Ur9sSPwnn
zo80Pt0o+EkoERi27E2A4CdhqeXB+qzFvmS+YILn9RaPOX/mMPWfIPGfsG9G
o6Vu3oL/hGsrD7YaPEDwn7B5ckSK77w4Gm/Dku9mdHuwVYi3obR93ZaMO3B1
4fYZI9cnkfc1Q7f6P8/Z1CGWvK8ZnJst6NU9R5gfweli/3lHNxHmR2CYGVIm
ZQUdR8ywR3tcg4zc17ciKgnjGpQa0rHiL5eD6LwJ3KuuWXz+jDBvAq95rreq
LRbmTWBYHRHyMUSYN0Ej+7otmS/D1d0LC2cvE+bL8HexyQVP3BLmyxB0sf3z
MzOE+TL0XAPe2WnCfBmesdLtisaE0PgB1mjHD9Ctgn72T41P0Hk0pI+NWhDm
JcyjYUaaV/vot8I8GrafuV2obUlG59Hw9IVzo0N7hHk0VPQveGbFOWEeDTiP
VrcrPXPZMOtUcOQx4X6zZ/b7mtTvq2eD7fefq+MrPWvyS7uRzquTSXnlHn7Z
PWZqbnr2XZDzpmJ75PePye4ZU7+vnjULGrVh0P1sag9I7AFte5R9PoQbOGtz
Awk3kHAD5EY4AHKQ7Qsi7wv4vmQeyiTzUCaZhzLJPJRJ5qFMMg9l6nmosk9b
Mi6DZFwGybgMknEZJOMy4LhM438n+4/G+ajTOB91Gudr10PvCWGCTuN27frp
3zcX13NpfK79XIfzCCQ+17bHKLGH/h1wcT2XxuHadtJ7J5ig03hbXT5Y0Glc
rW2/QWK/QWI//bvb4nou9ava76WXvBctHyzoNK7Wfl+95H1pPcmCTuNz7fd1
OMdB4nNtDvQeBiboNA7X5qCTcNARO8X1XDoeafOh9ScLOo3/tfnoJHwc7qkg
/lP9vsrfUVbrTNDV3Gj5YEFXc1N+am7KTz1OKT81T5nucC+BijO1J1nQ1Zyp
nWmCruZM7RfXedXjlPKj47v2e+kl70XvDVDmfWqdCTqd92nX73BOn8z7tJ9L
z30zQafzO217jBJ7jBJ7HM6zk/mdtp303DQTdDqPU5cPFnQ6j9O2n/4dXnGd
l87jUKfzOO33oueUmaDT+Zr2e5mJneI6L52vab8vrSdZ0Ol8Tft9HdajyXxN
m4N0fVPCgZYPFnQ6X1PbKa7/0vmaNh9af7Kg0/maNh+LhA/9u7f///VfCR8y
XgQLOl3/lfAh45F4byTNh0v4cJ2uC0v4cJ2uC0v4cJ2uC6s5iOes6Xqxunyw
oNP1YrX9kYJO14u1+ZglfGj9aYJO15G1+ZglfGQc6HwhWNDp+rI2B5OEg0ny
vrSeNEGn687a72uSvK/sveg8JUzQ6Xq09nvR8uJ5bbpOrW2/UWK/zE4674gU
dLp+rW0PLS/eB0jXtbWfq5c8l+ri+W6an9GuRycpL4uT6X1ZTNBpPkFdPljQ
6Xq9NgeHe71IHgl1mkdS158s6DSPoX5umqDTfQJqe8Rz4nSfgJqDeB6c7hNQ
lw8WdLpPQG1/pKDTPJg2H72ED60/TdDpfgNtPnoJHxkHGm8HCzrdh6DNwSDh
YJC8L60nTdDp/gTt9zVI3lf2XjTODxN0uj9B+71oefFcOd23oG2/UWK/zE4a
t0cKOt23oG0PLS/eB0X3M2g/1yx5LtXFc+h0n4N2PRZJeRpnivf5/B9KMAOk

    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[
         TagBox[{Polygon3DBox[CompressedData["
1:eJw1mgXYFsX6xvcNZ31HAZFQQUVAVETMoyKCAaiklHS3ggLS3SEGrYKoKHaD
mNitR88xj90dx2496v93e8//ur75nntnZ/ednXn6mfpDx3UbW8yy7KpSlvGX
dQxZVh3ak4tfoK0KWTYBOqecZa3Bc6E/8MBE+lqDvy/6fivwubQTGHMmdD50
Hu1E2jm0ZbQ2tOVl902A/pb5nXpXX2hz2mjwF7Sm4AHQ0xl3KvQf0K/5rTHg
I8CjaIPAtaGf0z8UXB98Gm0IuJ6eow0G1xGuZNlO0NNjls3i3TMLnutP3D9e
c4ZuDz2GNg6cQ1vSxoLHld23O3Q4fSNoRdpk1ugQ+u/l978GPwVuCZ1IOwi8
jf4lZX/3UmgFeixtPPfO4PoMaE3o+LL7GkD/C23BmNOhY8v+/V2h3xTddyT4
26KfbQb+rui5H6d1gB5d8Bp9xRye1LugI7k3ELwz9AvGDwPvDe7H2GG0aVwv
gg6ivajvyVlH6BZ4oT99A2n1NSdaH1o17n1A6w1+H3oX46dDtzJ+TMH9/GVl
/g2lfZLGDkn9PzKHGdAOzKEBHT20Plzfk3v8Nuho6GBar9SE96X1TPNsRFuc
+t/TO2mHFswH+6d5fqh1Lpi3xFcT4IH9tZfwwGjoSPoOgP4q/mLMcGgB2qzg
7x/L+H20T4z/mevDCl67MeI/6MHitzQfzWs84/fTnjF+LderaSclfumXeEbX
WtOdab/zjsN1P/Ma90970TzNWeu2IPXruQXpPRqzC7QDbTb4S/b4Ce099Ava
Y+CjoGXm8ha4W8m8/FVmfroyt2zPhB5I/5eZZWko13tC98y9V9oz7XOF91SF
Xle0XpB+WK49zL0u06FX5JalqdApufdjMvTKktdMfHdjybpCOuPqkr/7S/BN
JesA6RXpIe3Df4Vz64jZ0BtK5nPxu+bVOPFeztzehfbg/uUl64xPGXNdyfIi
uRnB8x3Bw6BPapz0BnQDrSf4fcZcDO4lvgZfBO4Bfg8ceP874FPouyS3jI2C
Xl+yDEoWd+b6ee0V+z8c/HH6rU0ly91njLkM3B/8CfjakmVU+uzS3DJ/Wm7+
b8J3Xaw+xjwuXoDulXSadNtB3P86s177mXvPQU+Qri55DieWzI/7JBn5nev/
0N8O+gntQfEc9CPa/eJpaJH3vgHuorG0m8ENof+jvQxuD/2D9opkFvo97Rnp
TegPtH9J/0M/pT0k/Qz9kfZv6Xfon7RXwR2hf9FeA3eC/kR7FtymZL37TWY9
+yzX10H30Dto10r3Qrdjnm+Du5esR7/LrDdL9L8J7Ur/HuBu4LdZ24MZ823m
tduN/q7Qt+i/omQ9IbvxL/A14LrQt2l3SSdA36LdCW6iNaDdIp2pNaBtBjeC
vkm7Q/pG30fbAt4H+jHtAekU6Du0u8FNoR/S7pOegu7K3DrS5nA9A745hvnt
jt7Yjb5OsrOaM9cbGXsE/LAr+FLw4eC2jF3JmBXQ2vRfQP8/6K8BXi6bBK4J
XgE+FFwdvBR8MLgWeCX4MPCJPH8e7zkPupnrCG7KXBZwPQm8EDpT+hI8C7qF
MTuAD6xY10l+b0LnzwYvAT/M/VngxeCHwDPBi8AP5ta90rc3M74ac5jPHA6k
fzXvXcM710DP4boKeCv0XFpV8G3Qs2k7gm+FtofWlv0Wv5at/yZpPXKv3UnQ
k7meRf9EaH1+6y5+qw39y9L89R1LaNuBb4A2Ysx9jGkH3ht8L7gteCktMOZG
6F7030l/a/Dx4AHgHfmm67UfjLkb+hp9m/jdXaHdyt7bydCdGL9EPoG+DzwX
fAD4ZvAd6uc9V0fL+UTpFvBh4EXSn9E8fSb4V8YNZnwd8O/goeDdpcvBg8C7
SV+Ch4Drgm/i2VtL3q9N0TIwlv7N4LvFD/TfCt4mngHfAN5SMg9sBd8j/qnY
vg9I37ie/gLv6V+xnyB/6D7tFf3z9Cz4f9wbJlkE/wDuA66ttWTMmeB9tPbg
8eBG4Bw8AbwvOAOfCq4PLoHHghuCy+Bx4L3BBfBp4AayOby/n+RJPEL/HHAT
8PbgKeD9ZIsY0xe8C/h7cG9wLfE7Y6aB9wd/R38vcE3wX+BR0rvgCmOmghuD
/xQPg+uB2/HdtQr2Y5ZCR9JqFryfy+j7o2hfbLvkj80p2O+VAyT/LiQf70jo
X5l93OkF+6R/yn4X7IvIDxEv9IF+XLT9Pyn5Escmv1H+o3xY8bZs5NHJb5T/
eFNuX7Z57r2dR/8vvOeo5H/KD22Z/Fv5ubfk9lNbiD9z+8RH544DJIOy30uS
Xyf/bjhrsiPPjdZ6l623jof+VLSMdiz79/S7PcA/Fy2bncDTeLY5tA7PTge3
ANeN1iftwfWi11X+UIn2K8/O59leZeuZdtA9GfOZdHbB9nUk/VXpH0N/Pfq6
F6yPfuPZBdDe3Ptf0XqpL3gv7p9SsP76nf6F0D6KE8SP4K3ytcVH4NvARzD2
j8z+n+RmJXQ76G+0l8BtS5atFeAydEjZdng9a3gR7dHMWH7rfsmnXcf1BVor
6KnJd5UPq9hI+lC+0Zq07/IbpW9qFOxzn11wfCFdOSz5h9X1TWkvtCd38N6d
6Dseen9uf/tO6O20auDjoCMYpzhwe8U4yacaVvbvNEy/JV2i9dc+XFOyPv+q
aH9Hfks/6NWSf+hc6QbJEPgG+WCSafCNij/Yoz20ztiCAWXvzzTFI2Xvy1TZ
cN63Z8H7cWHuOEHrM6jsvZoOvSB33NAK2pX7exS8x9Jbq6ABup52Cvhdfrcz
9+sWzItdoLsX/D1rGNMZ+jpj1oK7gN8An1+yz/Bm0fHvmVpryVzBeFLmeLh1
so/qm5D6ZT8n0iZntqdak3ll79f4NEa2d3Ia80ju9VPsM4q+swqOuQZKt9F/
adG8JN8+5I4Jzkr88CtjHqa/mfhNey35Ym03gF8A15Be5dl/Qo4teQ7nJL6R
bdaaH5vbNmtPJ1Vs10ekfZT9H5vmLN5UHPhR5hjljKQHFOdOkf4qO9Ztk/wH
+eqKCeWvTy14XfS94n/FeO9l9lcVRyn21HpMSWMeyL3/x+Re13FpDvJJFBfM
KJuftV7iAa3HqLQmmqdkSbHqlPTbeqdyFOeCDyzb/xH/L4bOiPZ9W/Ltl0b7
/UPAc6L9vOPBG6PjjaHykXLr5E3BNqcx+A75+YwZWk6xQMU66Ur5SNE+4nH0
zY32L1uBL4n2aweDZ0b7mseAZ0X7mseCF0b7jieC50f7lG3A86J91tbys6J9
+pPAywuJt/jtFdBVWtPMdGXC2h/lZMSXYxPW2oovzk54fMJV0/1zUr/4+tz0
fuV6ZLPkQ8ovlZ5ZltZ4eRojvaVYWDZLeR/ZQfmuygVpfofKFhSM/55n2eNX
Jt9wbdJ9i1nzvty/IthvnApem96nXJN+e27CU5PNVR5K98fnjgOu49mFue3t
ZuUrcse+1wTH6cOT/pxdtu6VvH/Dum5jzEHQW4Nt/pG5c0gzCuYh5ZcU613N
/TNyx2fXBvNk/yTL89L8NE/ZKcWqVwXnGRTz3hisI7QnylPMz21nbgnmdfG8
8guPMo/l4BL0nmCd15KxtwXb3Gbgd7l3Pbge9HnaBvBO0M9pW8GNoS/QLgZX
hz5HuwhcDfoG7UpwHeiLtEvAOys2CrYp8g0+01poPtD3aDeA94I+TVsLjtDb
g239UYx/n+sbwfUVVwX7xvIrnuH6fPAO0EVl85p0yB3Bvr38loe5dy64AH2I
dk6W/Z2sfFC6DPhX0fwj/+nPtF5atykV77H2emrF96clHlN8Irsj27cy7aP6
Z6X3CKtvZsKzC+Yn+W+ysQsSTyrmkT2SbZ2X+E28Nz+NF+6fxk9Luk65NsXn
8qkXFuw3Sh8qn7Vfem52elb+j/xL5a80l1n/P3++6zzoibLpweug2OTB4LU6
QbFMwXZTNvKfrNUaaAX6SMnPFqFP0VaDt4c+ELy2ipUeDuYxxVNPBe9Rh9yy
PjPx/PQ0H/V9K15kzMEly6TmLvl9PPj9iqemRcf2R7MXTwbzSXv6nwiem+Kv
boxZptiBMWeCH1BsC54Ifhx8RMWyKpk9vWLdKh2rnMz8svdful1yJflSXkVy
KHk8g/GTFPfIRyhaViWzo+k/q+y9lS66Pjg/oFyWZFKyqRzU/Ty7DrxjyfNa
D65Ssm4cm3TpsqQD5Zuem+yX7NgNwXkw5dwWJ7tzkmLesu2V/N0BiRfk6yoW
/tuXCbZlsrcfZvajlH9bWfTYkWm84pKd6V9ddPy3g/Rk0THijtIzRcdkVaTr
io6p54O3Bcfpmsse0bkIyaZkVPHyPPDdwTpZPHl22fw/IulJ+e2SU8mr4mXp
H+kh+faSfekAxdrSmdKdilO5lW1kDk+ALwPXkl9ZMT+IL9YF+2On0XdZcF5u
IvhC8MngU3nfKp7pBH5V8QT4SPAjijnEI+CHwbPBzcCPyveXXQU/Bb4g+NmR
vGd1ye98jf5LwL21zuBPM/u18snWB/uEY2Svg/1J5Tw3BucP54AvBnfPnPO8
NDh/OCs3z24E14QulD2XLPL+88BtwS8Jy3cB3yeZyx0/3isdWbE8Si5X5JZx
yfr5uWVKsjWvYtmRDK3N7fc+Jh0gXwD8Iu+fW7FOkG5YnTs2eUSyLp8C/IL4
AXwC+HnwmtxxzaOMWSSfBfw0/ZcHr8/kin0/+X2fcL1Y/hH0maLzE7BRdnnR
MXQN8NqiY/qa4AvAy6NziF15z4roHGI3+TO536/fWRmdQ+yuNYiuZ5ys74iu
tXQGr4rOIZ4CXhadM+0oWZbO0PcWnXc5VOtWdM7pAPFz0THlyKRXlRs7TOtc
dD5gb/DmonNpR2mdi86lNdc6g6eDG4G3FJ3zaAK+S2sYnYvvpD2Jzsn2VG4s
OvfaTrmx6PxgW/DS6Jxpe/Dk6Nx0M/DU6Lxnc+mraDk5EjwlOl95FHh1dP63
h743Ou/fAXx+dN62N/ii6NzuAPCG6DzpQPAF0fncPuCLo+sEgyRf0bnavpLF
6NxxL/C66Lxtv4pzV/tLPxSdRzxaMqvaVO5Y6SL27nbG1yhbr94B3qVsXa0c
zHaMOZ/xd9Jft2ydvA18eNk2WjkYxaEr+HcX/U3LjkeUs+EvW1V0voefyS4E
jwbXBm8oOidUC7yu6DzT7uBrwf3BCoHWF51nUux5fdH5pDrgK4vOM+0G3lR0
Xqou+Oqic1cyDWvADzKf20uOlR4A31ZybDKiYh0i/TSuYp0g3aDcbXvwK5pP
xXpM+mxUxfpNem50bt0iHTMud+56Q3Cutx345aLzu63A/wZfCG4NfhZ8P3PY
WrLvdw/45pL90nvBt5TsB94H3lyyD3Y3+JCy/aLx0fbssIrzWw155y1F58wa
gG/WujFmHdf7MuZ16BX07wb9NTg3Lj7vFrz+yr/1CF5D5SGr5c7/K67ZEfx0
Zj6smrteIH7rGrxfyst1CdYPyhN2DtYbytEdE+1bdGH8n/Tfm1lvnBxs75Sv
2yl3HUHxWvXcNRHFaMXc9Q7JyHclz+E48VHuOoVk86/gnLz0z9JgG9EQXCV3
jUPy8kawrZffovWQnn+H9Tkrd85cufPtc9fgJFOV3LVXyVHMXReW7IgJVXOR
TlMMr1he8pXnrvVIZo+T8kz5VeVZX+eyM79ZyF1TkK77jPlcnTkm/TS4fqFY
8vPgWoniwV7BPKw8cOvoXExV6Qr6W9LfQGsSXMuQXloWbJv2BreKzjtUAZ8Q
nQvbCXxidC6sunJv0fXvmuC20X5VDXDHaHu8C7hDtD2uLf8iui6+M/j74FqJ
9N63wbUV6cOvwTdljnO/Ca5DKZ59V/KQOTZ/qeQxDaTjo+OTFvR/EFzXU3z9
RXD9SDHy+8E+huLoXaLlR/z8XrBdVqx9fnBcqTpL8+hY5QT6f5Euy6xXfw+u
48ju/BZcJ5I9+jm4BiS780HJ/HmIdER0Xmaw7HawDW2k2BzcBrwf+FRw08x5
71HBtkm58UnBdkd57CnBOlZ59cnBNki1g4HBMqsc9aBgm6Wc+YBg+VWOenhw
XkL58xHBelv585HBNku598HBtky59P7BOTr5mGcE203lz6eCW2Su14wNtpXK
h0tfqb6mmsJHwfFg79yyIRnZE/79ODje7EP/28FxYk/wJ+DbJCPgV8FXibcl
x8ExaWfJcXDs2QX8n+DaSlfwy8G6qBv4leBYtbv0SnAM20m6JzjmPVnzDPYH
lOc/L1jHql6m+FrxwjW58wOqJ14OfS3Yz5f9fTHYp5Jdfh18YWb7q3hVMdFg
5dWCfTbFKS8E+06y188H+1qKWQ6IjtsPl88T7Gs1Bq8M9sH2l00P9gkPqNgn
VO5VtaHHSub/GiX7cl35zYbR8ZviuO5l+4qdoQ2i8wKK3XqWbWuqQYfRf13u
uoLqNcqBKN65NncORGcDNubOXagOe1mya1WU7+LZc4J9vH0q9rnlP+/AvaeD
fVfZkVU8U6fgupL8TOVaVVeSbz+QsftG+6v9wftE+5nKwarGNCH6O7U+LaNz
LoO43zQ6RtW+t4jOXwwET8jNX1ckP0J7p/M5tcquj+tc0KTcZ4KuSj6Ivktn
aX4MzpcO4P5P4Ecyv/Or4Bi2f+6cs/b2Np7dBP4hc21uu9w5Vcm1zlhIhysv
+0dwflVz1tkGnSnZt+z8tmoM+n6dc9C5C50pmZb7DM610WcGtJaXR58NkE+t
morOXSjmi8qjBvszqvfp7IHODOg8k848fJZ5n3Tm4fPM9Q+d09D5COXzdR6j
IfSa5Jdpr3XuSDl8nUFpDK5e9jkQnRHSuQWdwRLf6IxHI707usahWoa+VzlO
1S5UI2hSdk1EZ2mWMM8OmevLi4P9H9WgZwf7MKqBqj6r8yvi1znB/oxq04uC
fR7Vr1UbkJ+mGuKXwfm3frn9L+WIlCtSXVe1YNWSVAtWTb1riqmVZ1NNWTVb
1elUhxJ/Sia2RNeLJTe3JD+uSsr5yZ9SnUtn21RHU/1LdSnVy/6uo5VdH1at
QXUi1Y1Vp1AtSfUL1ZzE36qpqY6mun7PYD9TdVv5DKqP3Zh8NNUHdaZL/m8x
xdeHpFyEchJNU05DuY2Dyq4V6tyRfD3F/ToLJ/9O9USdB+sbnB+QDu8XXAuQ
3VfNRXz0B3Rw9HmXJuBB0edgpH9Ojd5LxdojomVJMe9p0b+tuG9g9PkY6a7u
0XHjnuBTouPJeuAB0XUX2bhe0bG6/I0e0XHpXtJh0XHj7vKXo+Ph+uAh0XG4
dODa4By7zjwMj+ZR5QS6RMeldcEHReccpf8Pjs4nyo4cEp3T7AE+NDoHKrtz
WHTesxf48OiavWxWv+h6j/TbEdH+rmzWUdH5TemEztExfB35n9E5hd3AnaJz
DbuCm0XnXsWrR0bnUmXjjo7OmUrnvBWcm9Xc+kbXnOQb9ImuRckH+7niuEVn
DLozfvvM/pjOHewCvlixavA5Q81nZvBZRK1n4+g8qWzf/tH5U9nT/aJzprKP
Q4PrSvLlhgS/Uz7eGK0B+FbeX4yOr6pVXFeSPpFemRGcQ9P6K1cnf+Y5nYOK
jr2Vu5vLmMMz88aE4Pqp1ufM4Lqq/MPxwb8l/3CH6Li6FvjA6Hyl7PuMkt/z
kM59Redr5J+P5tl6mf3JMclvkS+6IDjnI16aH5wXEr/NC84LiT+ngw/MvHdN
ovOh8jFOC65Xyo99JzhfLT5ZFZxLkbwovpNeH6n5Rvuj8j8nJRshW6E6hWr3
i5Kd+j7z+Y0F0T6ifMs20WuttW0f/Z36dp05U+5IOlcxo3TzqGh7ofN1Omd3
XnQ8o5hIdU3lo6Tf/w8+4gVs
            "]], Polygon3DBox[CompressedData["
1:eJw1mgX4FsXaxvd9Z911X0EJBQSU7lIRCRVEEBSQFEGUEETFAANQEQQxSRGw
ABUwwBZBELu789ieYx672+N3/7znuy6G/9zzzO67O/vkPdNo/JShk8tJkhQh
SVL97ZAnyf76+5wGq1WSpJvwLOH+pSS5Rf2zsiTZU/hCza8h+Vrhw4Q76uIb
hfdmjvAAzb9V/QYaO0Oy8zU2q0iShzLLh2rsNskGZf7dw3S/HyVfpWs+FR6v
6+9Rv5bajsLLy5Yfovn6k4zV/F/VeVh4tvAhuskG3e9+4TOFa+n6i3gXtQuE
hwvfr/5gzblX99pdY2dq7kA13SoZqf9+0P0GCLMeI4S/F75P83/RQD9df7Ou
nyD5zpJPljxItpvGegk/rznVhVsK7yF8n/C2wlM0v5nwGZq/nfAs4Y7CFwTP
v0ftJ809UPe/Ude2Vesm+eMaqypZq9zz7xcueHa1n9U/SPNvkqyNWlfJH9NY
Fcla5/4+DwhXhNsJ7y38hPD2wu2F9xF+UngH4eF6Hv1Jxul5ftP7dpS8v/Ab
ku8kwWDJtxEeJflPkg8R1r/kcOGfhXfX/IOEX9P8mpo/UcJ6widJvo3wUcJ1
haegX8IzM6/P+cH6dbRwfeGThTPhQ4W3Ez5S+Hfdv7faDcK7Cp8t+W2Sn653
/5/GztZv11D7QP1c3/9qye+S/CThHsI3C28v+TvCQXilcFXht4XLwiuEVwq3
0P3GC68W3qp2vPqdNbZeshOFv9S7HcU317PcLXyC5F0lv0Hya/R7XdQvqZ0n
vIVnUv+YqG87qL2ra1Nds0rXVhN+T3gb4SuFH9f15/B+mn+JZP2wGe7FN5Ls
EbU56tfT2FLJqqu9L5zp+qt4Pz1TNeHFesZewo9q/tnC9TV/meY+JjxXeBfh
5cJ3ac5xunYv4XXC44RfRf80Z6nm7q37XaH+9lrv0yu2H96lkdql6t+d2zbP
V3tE/acy2/ZY3XOT5o/JbK/HYlTC/XS/Deq2EL5AeKCuWSm8g3Ar4YOFV8Tf
ayl8u66fpXsnaudINkhtlWA1yVtLvgdrJPy6nnlH9FP4SuHqkrcRHqvrdxKe
JFwSHi1cU/gY4b/1LCOEq+BfhP8QfkDXn6Tf2l5tofpDKrZddBRdnan3miLZ
KWqz1b9BY0dK1lD96zW3i/5mku2j9p2uO0LyGpIfrfv/T/ffyPeVbLTaXbr/
SOGqkk+Q/E/J91dbx/cSnq37vSj5YuFHhdsK75Pbvx2s629Tf6Dm3yXcTvIF
kq/Q/CHCO+s51grXzv3+l5Ztr5fgkzX3CY1tK9lxwp/ynMJHFX6/Xrr37/hD
9XfM/fxLyvZ/l2n+vrr+KT6nZJfyTMJPEjOET9Ccsayvrt1csY73kvz5xLo/
HpuT7L+sifBMteHq/0f3P1qypWp7af5D2KhkB+t+W9Rvq7H5FdtIb/VfSGw7
Q4Uf0rWdhGfr3Y/X/MHqv6OxiZItJ2Zp/uP4BM2/WLiT8IPYvPAy4c7CD2OT
uZ+hhZ7vt8TPdgw+V/gP4bPw98I7CH+BTuf2Ifvr+ucS+5YT9fvjkGnOFsm+
1jPdzPtpTrcYP3Ot72SNbZbscGxI/faSd4nftyjZZ+G7jhC+hzgseVfJ91Rr
FHzP9yUfKfkd0Z46SbZJYyck1sELkLEm+BdsNPcz7BZ8T56N+LytZFOEtxC7
hTeq31Jz9tLcy9W6q/+0xrbD/ohRWtvdhGdk9pk9JX82sS9dGe3hO3w8+in5
3ZrfQfh0yYZp7Fr0U9d0kGyU8CbhVsKdha+hEXs1dkpu+2ItvieG5PZxB0j+
YmLftytN/Rv1G38V9vl9JH8pcSxYl3mtv1Y7Hv0Ubqz+9OB4fJFaR/XvT1CQ
JJkqeWt0KTjedsqdz3ys+9ch3ko+Q3gnrdliyRZljveXaX5tvg86Kfyu5tcS
3iB5dc09Su1e9El4F95N83N0XWOjhD/R/J2Fp0vellgWHI9rSj6i5JhEbDo3
cz5wUbC/65nb3x4i+Wb1j6w49hKDl+FrMucDi4PjMd+H59tF+nmt8H65Y8sw
XX+n+vdr7HddP1j4DuEHhP8QHiK8UfhB4T+FhwpvQt91vya6/rTgfGQv3TdI
1k3tG82bLHlTvn1w/jFE16wVri3cTniS8JeJdfY6zT1G+PPEOntt5hjcV3Nf
Tvz++MAawT4e37g+s+5+q3ZibpvENkfzTbAffKieozdrIHxFZv/0ldpxuf0l
9voNz8BaZM6PlgTnO9OE2wjPCc6XJknHBgm/TQ5QsQ/Dl+E/L9XcU9Va4SuC
86+h5ATCdYTbx/kHC79Zti9co7Zask/wv8h0/Yf4C7Ujo35/hP4Ro/DX+v0x
+E6t850Vv+9A4bfK9k0Tct/rM7WJuXNgcuG6+h4XC5+q9qNkjWO86iNcp+Qc
nFy8OzaEfuuZzpR8rlpj9W9hjSQfIfyUfqu78AX4H+GnhXsIzxM+A53V/KuE
P8C/VVw7UEMsFN5Pv1vR7+2n9r3G2xURa/wmYoXwevRT95gjfJjaM5q3n8bm
Y2uaV0Xz91f7UePn5s619oz1xmi1lzR+ADai+cML+3piCrGFb8y33il1fOgp
+fXC9SQ/C3sQXhP1cxa+svDaDdf824XbC2/H7wvfQn5aca6NjWFrw8m5hLsI
z0U3iQHENmxe144qHCuJocTSU9RS9S/S2EuavwQfIvyAcEnP+oOu7anf+1n4
5uB35t1/Fb5FeLKeo3vJPnxv9a/gHTT+jORVdP0Vao+q31VjR6Zec9YeHbhJ
YyelxnwDcmSetVPJ8W6d5FM01qPkmLSv+ieq7VtyDOuaOsch18GGbwzOkcnV
dk+dO6Oj6Gp7jV1NLVQ4Fx2psY3R/rHVdhq7Krf9Y0ttha+Mz99M/eZqK3L7
FHzLp5qzPjhnJfdvlzqXJQcvS94pdW7+rebvXbJPuUHzF5Mz6u99wn9nzl8P
V79NrC8XZM4flmvOKM0dWTh3IGcid8LGsDV8wDGFc6y6qX0IvmS9cFPhCayv
8A3CzVLnOFcJf5E5X3sv6jf2v11qn4D/GCP8su7fBx8kfChxKnUNSi26TP1l
JdcUC9TvoGeoqX5/9W/VtevUmqh/iOZfmdnGsXViKLEUvUV/0Sl0a9/Ctrqj
fmdGxT4J34RPmUg9V7jWGKHr7qjYZsithkR/SQxpkDrmE1uuIz8RHo8+ZPaR
+MrB0d8S33eVfJjwqsw2zVouC7b1wwrnpuSU5JY7566vV5dd35OPfaj+CI2d
XNhn4DtOFt6a2SZ5x1OE786cE+L75wXninAMwyRfFP0dPot3XRrsy/Ah+JJj
E3MZQ7N/0oLkCMl/oV5QeyxxTkluWUfCWsKXl13/HqKxR9TvTAzPXDP0VP+8
4FqCb8S3Iocgl8CH8u0vDvat6NyzZV+DLvbQPVerX0vymRX7lL740mBfg38/
NHWNAPdBjdszdY1A/jhM+GHdby9iWOaGb5wfLOMZ0bUFwc+OD6P2WxTs277S
tXuWnA9fr7FFGttdf+8V/h/6TG0k+U/E6+AYgezD4NhBDUgt2FhzLtNaDSuc
a+Hj8HXfZcYfC58r/H1m3/eJ8HnCP2auBT6L9eIPmf35p8Lnk6tk1pevYn1Q
U/dviK+khsX+M9v6R5KfQy6T2f9+HeulPzPXMt8ILxRuU3h9qYGphdsWXg9y
KnKrVoXXDxvFVlsXXr9XhMdWXFO9Lvxn9Ben5bYF1uga9c/M7Rs6Cl+buyZ5
TfiPqE876n6N8O3kcMTuwutBzULt0rKwPhPjiHWHFl4fahhqmYWx/rskOPbW
kLwBvkjz+0b9h2vbWb+/hNowdz28tGy+i5jxFi48xhLeiXdjTS5G93JfOzvq
2+TcuX7dWG+enDt3bxDzywOEa5fMGT6YuYZ4E98bXFtU02/WxjcSs4WrC9eJ
9t5H+LfM/vdLzZ8nnOn6V4V/j/EM/Rqnv5ck5h5+yWyfX0h+IflA4VhIjUKt
MiC3LjZVu1z9qpJvi68krlZc0/4L3Y7xub9ww5JzbO5/eGF96R6fn5qRWuPX
uP7NCucq2DC23LywLZMD8T0aFc4NyBmwL2pEasXd9BtryCXLjoXksGt1z4aF
fQk5BfZevzBXCSeBP2ksvG/inAz/UbdwrUWNRq1WS7i58Ebh/vhT4faJazJq
swaFfQM+C/vftXAtjc/AP3xWdiwmx10TXNNT23fQ2GrqM8lbl5yjFhq/j3qg
5Ji0KHfORO40JzF3RQwhlsBJwU11Tl2bEqOJ1XARxGJyWPLi2brHxMQ5yfXq
1ytce8LZwt1+Dndbss5RN7KG1Ir1Yv1dW/NbCG/SvAH4a+GWwncKH1xxDkDt
+kPMDYYW9hfUhNSGxNAJ0bcRW4nhcH/XBcd2fCD69X30jXAW1Ka/xHwTTuQN
4b9iPJuV+3p86nXqNy2cO5PjEv+IiePjuxArsQlsA5sYLxnBCK7hx/h85Ihw
Kz9Ffwo3iW/5JT4jORe1b81YL/DNqJVqR37mS91zq/D7wXzqHI2fquunqs1V
v0nhXJ8cn/g4Q2OTS+bA4IfIWY6I34pchpyO3A6OEa4RjgWu5ufov4hPPWIN
cCG1bW4uo6HkHSu2eWyfmA+3Tg5E7rQi2N824Z3x1Rqbja/kG2r+/MT8PjEC
LgROhNhBDUAudEWwv4QzhDuEc3w+M+cI9wjn+FzmPQDs99xg/YJDhEuEc3wh
M+fB9zon2L7qq3VPnR/Dx9UT3id1Pv7/+x39UudrcMG7Ch8kXC3W67sI9xXe
IdbfdYW7pc6v2V+hZiVXujy4loWD3T4+7zuSNUQH9f7zEvMRxMTmwRwrsfJA
4njJOTQ+s7HkbHAs0J+zCnOs3A+O99nMezPsjeAjidtw8s/FfIRchj2K52M9
x97F1NR7O9SQg9Gd1HtD+PyB5IWZ/c/x+o3eFdfQ7D3AYVBbw3Gw90DNDffB
ngf8wa3BeyHsscBl3R689wKHhD7ODfZfp6fmPvDRo1NzKHApcDbLNbcZMRlb
TMynY0P4gxOCbaupWo5uJubD0Tn8w4nButiCmEBs1tjZhXOSZsK3J85Vmle8
V7ZMeE7hHKap8G2JcxtyjibCtybORUZlzk+OCubnT6jY51PTH6vrJ8ecC593
kvBUYl58vlfgKgrbOxwoXOjcwvEHjgSuZFp8H973VXKBwvnYHtG/wSnDLVNj
f5655qX2XSf8Gfmo1vA0reV0Yh51g+R/Rf16GnvSWJ+S9fdAvrfk2+B7yIkk
P7KwvcPRwdWdk9qXcE/ufXyMKdR8R5Mva82vI3/Q/N3IH6I+z4/6yO8tgbtQ
OyW1b6F+hJ+CpxpT2H/DwcLFji3sH+Gc4Z57UxuUzOnPUv/1zN/ymWD+sb3G
Fpbs885W/4DU7z5N7dzUOc+hmr8yOBdi/6d56vqb/I3v1TI1X44/h0+htsBH
NYn5D74qibbXK/e78Y7Y7nS1KuQSGnuTWiW3beLT8G2nqVWN9vl2Zn2plrre
pl6GX2gt/Gfi+MieDbXRquD8FX6/Sup6mb1UOMGR5DvB+SzfY/vU9TH19hK+
f+I9l4upk1iTkv1Tn9Q1K9wMe3DUst1z71fBEcIVUvNRi8EtUAv2gLNMzBnC
HcJBvhb3l6g14DBfj3wl3CacG3uN/RJzcXDCcMNw0p9k5qRbRv/+cWbOu0X0
dx8JdylsK9gAtjAq9V4afCXP0LmwrmJT2BY6vxlfGmwLe1ecSz8U40dHzb8w
sQ1gC3sV5mrQeXR/z8K2wfdEd9EpuO1rEusaOQ/ztwbnQjwjz/qvYH4JH85a
vhDs29lDf6FsTpm9dWIye503Jo7Vewg3iPjdzDGT2HmT8HuZbQhbgmN/Q3j3
eP0NMV5Q41Prw/H9W/jDzL7sjVhfMoavei147vzUfMrSqA/4wzGp/S25Mf7v
iNR7lOxVUkOxl8GeBrUVNovtXqS2WP3ltJI5jKWp9Y17M4aMGo69HjgSajtq
NPa2yFGo3f6T2be+HsxPYlODUscbbA0fhS3dH/y9usTn2RrXjz2UDvH5vhKe
VDG3T7yYm9tmh6SOZ9gyewCPR36PvYFdY8yBM59ZuIbn+28Oru3hPOFKXw3m
QqlBWgfrGLXJPjxT8H7TT5ltGl/8fLCtkxOjn3cH58pw5HCRa6I/h5OH/9wY
zNWfnDl/PzM4v2fP4d3Iz1ALwkE/FvlIuOnjM+fPU4Pr41My1xczg/NjdKBW
/D10o0fFsYUYQ63D/gn1x7Tg+pQ9gap6nk3B9s9v8FuzgvPrWfH510b7nJZ6
75IakjqUMwvk/7cFn2WA35pdsg9CP6arDSyZg4XHPi31XgX6dnjqPRm+Hz4N
38aeBHu3dwb7m0mZ66FTg+vfw1LvfbOfgc86KXO9M0PyfqwnXErJMWGh+oMK
6w46hG4Tk/DFDwTbO/keORD17RmFOVz4tMeCuV3yO54ZH3hmYZ2FW1+dWJfJ
H1kT+PcZhfeQ3it7j4a9JXJo/Nk9wbk1NSq1KmdeOPtCzMWWH4/+iPyRHGym
xk6nNqy4Vn0q2uMeqW2RMxMXpubk2AupnpqrIydgv/Xd4FyBmERu8FxwrCIH
4dmfiP4TjhOuDW4a7pM9jjrxe7+WWWfRpSejP2bPnL1zYvJZqWMS9R51H7Hq
wNy5C/6b3AwfQ21PDobvob6jVoZvZD+QeoZadFzi/Z/7cp/FmJR4v413xta/
DV4LdAAuhBwM3aA2RbfQsV/L3kOspK5n2XsZkHqvj/M1nLOBi2VvppXwxNT1
Fdw2e0rsLxKj8L1vB8cu+FvOYnAmg/2cPoX9AzkhueHE4L119tg5K0D+gf72
jvlXt8L+rGr0DwcW9n/koOSixEBizVvBsREbY+3fDI6NfQv7c3LSf/i1wr9X
PTGfPCH13mJLtaOwzdRnpTjf9EusmamdyYnxFVtzn006I/H5hbLkG8o+0zQu
c05E/UkdSq6Ej4DLapzYd8AxLY3vy1krfAq+8LdgX8OZLs52wUlxFoycHHu9
N+oDZxg4y8CZEs4iEfOozV4OjoXkYNTW5NDkZvg4uEA4NXwfZ64eLPtMFGex
8FFwAa2ifySHgmtgH4TcCp8Kd0LNgK/F5qjFxwTbIvsdnA2CL+Z8yrDMfNZo
yXtWvD/B2ZpjEp9PGl+YH2CPmr1qaoDF8XtQG3Dm6a6y9xw5C9VC17Qjfyh7
v5gYRuz/IDi2wY+Q+1GT35KZs+ZZ/o7xrL9+787EMYhYhI+7o+yaDN8HpwG3
AX87XfOn5e7DQcBFwNc9nST/HMrbr+J3WlE2Z8a7MjYwmNNjLvk28aBXtO8B
hWNfm2D+bmvMD9mDmJd7/5paAp//sPqH5s5lyHHIdYbnfl9yGHKZcbn3gvtG
feEMBHvBrwSfjWA/m1x1htpDuX+T38anwSXeHf0VMXS+5PcIn5r4mRfkrlFX
lf0NqV27C/cIXoO/hMdoziOJYzixnBhObvp5xOTLi0qOIcSSNZm//V9qc3Ln
lOSu/w3ONbtypiZxDYB/PahwPkYNTy3PXgFcGjbHuUByFtbn38G5DHsSK8ve
g2Cv4ozc3M+ExNwVfDO1Cu+Mr+ZMC1w+HBRcFj4b383+4um5c3Zyd/YHpwqP
jvbZOT4vfDZz+Ybk+qwJZ0m+C16rsVFfukd/C99FbcQa35z5DA17i9S3V2fm
0OCpeOYZublB9psGqf0WdR7d50wEZyfYY2GvhTNNnD0M0X7xT9TunDG7rewz
CZw9I+eFK3kx6g/xe77wg8HcB/GJePNUcK41rXAuQU5BbsgZsVuj/+Ls2NTC
e7mcmWO/sXFu33d72efLOON1S/Q3+HNiINzA08GxkZycePZsrHeJN5xd4UzI
BPWnF9YXzhyyfwonRT34UDBXBQdFfflIMDcFh0V9+XAwt4XNY/sdUj9/l9zn
X4ld5FecMVtf9hlLzp5x5u36ss9ochaua+7cAd8P39Io9/kN1pS15QznlrLP
yHC2s2HutWaNWCvi2c0xvuLP6uW+97Vln9+sn/u3+U1+e5fc784z8Wx1c58P
XVv2+dN9c3OJ1PrkuwflXk84Hbgdalb4aTgFalk4Huq9+6KcmoR6H46GWgX9
o55nD5G9xGOJmTF/xD5PLVw/M4asWW5fzDvz7s1z6yI+Gl/dJHfsQAfRxaa5
12Zz2edbG+TWHXQC3YCjI5/YElz/w48Q6/Hh8K3U9PD/cELU+nCaxOO7gvkA
Yiy2flxw7GVNWVvWjLOy7JGujnwxsQrOET4PXg8uEr6D/fIDYn5LPsh+fZ9Y
n7FXjO1zJoCzAW1T+y5iGDoPx0n+Ts5K7grHCf9HDkwuDGcJ/0cOSi7KvhD7
Q+Rs7HOwLwRXD2c/KfU3Xhv5Xs4es/fKeQ5yOM7V7piav+bMAWcPiB9zhDcE
7/2Sj3CWEs4Q7pA13xzjOWeNd0ttD8RobIqaGe73pRhfyBc5m0WNy9kB4sPZ
kt8RvJdcP/V+AmcgOAtRJzV/zpmLybF+ITdkP5fzdbVSny8hJ2WfBP6SXAob
5DwePgJfgU1xNpX6iVoEHV8Q+Rm4kKuCaxvOTHF2mzPfnKWalzq2wYnBv51W
ON6zVpx3gEOmPqLmoPbonPvZiB3wqXDO8KXUsNSycKT98MXB3Cn1Jdwaa0B8
pJ6COzkn8XnYDbl9M9+A+M2ZL86icz6Ws2DUnHDDlwbXopyxY6+KmpH8j/OV
nPXEBqfAp6bm2hZFfqlG6nqEnJpzI9gk+tcmtT3+H3C30EY=
            "]], Polygon3DBox[CompressedData["
1:eJwt13f8zfUeB/DD+Tkie89sypa9k3XtPbNCJKuEjISijGSHKO263dDQuCm0
pYFUVjSUitu+FbfbeL4fX3+8+L6f5/0933O+v8/38/mcCiMn956UPZVKvS05
pFquVGpdOpXaB/fLkNypVFm2iO1Wvyy9WUP2GktLlkxhLdhBx4WksMxkRdlM
x0867ynpzPKza9hG9SZpxxrlTKU2s0PqLj7H2kwqNVFf6axUqoxMZo+y9uyk
vnpSV5o5tw372HF1eUbfN/rashPqmvIcO80uZ8fVNeRZ9jXryL5U15eX2A+s
M/ta3Si+M/uZdWBfqC+VF9n3rBP7St1QdrGf2D/YKXUD2cl+ZM3Ye+oy8gg7
wtqxT9S15Hl2hpVyD0ao73MPLmT92UB2hJWQB9iXbDA7pi4lD7Gv2CB2VF1S
HmSnWAnXmKN+zfs1ZlPYAH3vs4JyN/uEDWGfqcvL4+w71p8dUBeQTewEG85+
UNeRHeyPuH/sDsfZWR9/pxXq5q67T11WHvXaMX3D+Gn1JbKd/cou03dYXVWe
YCfZUH3fqC+Wp9kvrCgbqF7pe7hEqgcrwgaw5cx/qe5spPfLqaEf+IQV1FNC
rlCv0+cw1VtfMQeD2OrsyZjvyYqzwWwtU6Z6+ecK7/cX6yaHWW49Q1g21+jB
ustlxt8wlma91Mf05dU3lGVnPdlRlocNZ1msN/uY5WMt2YfqSrKFfeq6rdhH
6sqylX3GWrND6iqyjX2eSZ63D9QVpUKMOZ+lCzvjuGn83fWd1deV/SeeFXmd
/cauZBmfpS87wQrE2GM5WB92nOVn3di36ubyBjsX94V/qi4n/2LfxvjT94e6
i3zELtBTnN2oftU9bcSu05ePjY7zWDl2BavFnmRnWfdsxoJzX5ZZjhf7PJ3k
Rj2vsLlsqbqzzGG72TS2UN1RZrPa8pT3O+f9enjtST2VZBK7n5Vy3dGuO4Kd
Y03iM8b8p64i16of1leGjdFXmU2O54qVZlex0uzKeCZZHjaAbZXrXW+ez1Fd
pvgc1+sr73ic1PPa/eo6cmvMD86t79w5zmvA7mTvsbZsGZvESjrveMy5bLJ6
S7j3mcUvlmtdoy6/LeYgfQ303aSnPlvB9rAW7FZWL57V+DuyZmwBK8NGxjzC
8rKB7FK2nL3JmrOFrGSMX7aZGWapfqwiG8fWs2JsBKvArmZ3sqJseDxvPuNs
9gpryK6N55dNi7mU1WXjWWE2NeYWVoeNY4XiHrIXWG12TSZZU2alk7Uo1qQL
faACbELMGeqq+q7UV5BNjPmGVWMjWV42jN3DirM+LA8bmk7WoliTflNX9z1m
xLykrhL3Xt8l7IZ4/lhlNoldzKbHc8oqsYmsHBvDVrHCbCgrz8ayNawIG8bK
slGxJrB8bBCryq6LeZOVZWNZNTaFPcYuYlezmvEsxNrGarBprDabz/7NarEb
4tli82KNYTXZdFaD3RRrIKvOpmaSNXl8OlmjY63O7p5OYMWNsRIySd8j+nqy
n2Lek9bSSl939p3jFjFm9P3vfN+P6WSNjrV6We5k7f78/FwVc9bN7E29C2Ie
cI0hMk9PJ5/vJa8Pzkpei56m7Il4VtlE9gx7NpN8ruashczMlXi83lTdTGaw
xs7d6txG6vFee0pPE7aNNWYT2PZYu9mLbBC7hb3B9sjC+BuyYTLf+90sIx2P
kk+9VihnMoaGOHeDe3eXtPHdevJX08naGGvkfu/Vg72izhb3hO1jDdk9MW/G
/oitYaNYV8eHY3y7zuiY56RPrBEx1tj08+tRLIqtz/9NNrhu15hL8IXqEV5b
p54pfWMtifHMZsVYdm5Dx0tiLo1513W78d3O+0vfUv3vsmn66uipK2PZfey5
TLIna8laxfvpeTCT3N9HnZ8nPnPsJWNNj3NYXnYVeyiT3PN/snxsDBsnBR0X
ivvstfWZ5HmI5yIXyx33W8+9bEyMxdhLsOtiLymFHRc5PzYe1vN4zMWOt8T+
IsZvjG8p6riYDPfahkzSG+c8FnsdfnWu5NrxGe5n+eM7s83sqnhvVi32o7H2
sDmxf4i1X+ayXezG2I/EHkFuijlNasXYyUrWh1gn2rnPz8feIivpj/PasudY
11jH2E7Wkj3N2mYl32dHfC/vV0NdMyu5F3FPWut7Rt+CrGQ9jHWxlWxnc2Kd
YLtirnJuPfWieDbYNuf2Yj/ra5NOfgf8ybrHGhwbK7ndf++xPuxtde7YJ7FD
meT3wvrYbxkvJ2JONf4qspXpZOzGGF4UayhbHXuhWOPZYlaJrWJHWDd2W8yx
7K50Mk5jvC6PuY7dzb5gA9iqmHfZhnTyLMQzcUfMa2wTO8n6s5WsOtvIPmf9
2ApWha2JvVrsD9iSmHfZ2tiXsZ5sKWvM3mRFY91j78c9YL/E30PeZbGp7M3+
q75c3kF/xXPOvle3jDWY/c76sl/V7WKdZ9liX8v+r+4sH8bbxb6W/a7uJB+w
TOxN2Z8xNuRQPBOsH/tN3V72xR6c9Wdn1R1kf/z5WCl2i3qv79aKzYjPwt9J
J3NEzBWHY0+jb0GMAX2t2azYH7CF8b3YZWw2q8OeZX+wRbFXic8i++N5kY3s
eCbZx8V+brqx1ibGXOxnYv7U85ZzW+qbqe8Bfqm+M7GuxrhUL5D6jk+xwbEH
yZnsnWIPdZpV8NpUdS95y/tdIKv1fej9erO96lyx3rKPYu/jui+oc8jyGEN6
mrA96mJyLzuorxF7Q10k9gjsQKznbKn6fddtz+bFes5uZwdZBzY/9j5sWfzN
WEd2cyb5nfx6Ovk9HL+La3o+LmJLHB+I37765saei+1gGVnBVudMfncvTie/
w+P3eCHnNog5JuZSWa9vb6yN7F11aXmYHY39H9sZ87CsY2+zvwHL1NzJ
            "]], 
           Polygon3DBox[{{1905, 1053, 734, 735, 1054, 1906}, {2352, 953, 772, 
            771, 1110, 1937}}]},
          Annotation[#, "Charting`Private`Tag$3585#1"]& ]],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, 
      {RGBColor[0.368417, 0.506779, 0.709798], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[
         TagBox[{Polygon3DBox[CompressedData["
1:eJwtmXW8VkUXhS/Ie8/csxW7FcUCxUYQA0EMVD67u7tbMQlREGw6FURARUQB
g26QlBCku1MEFIHvWb91/xj2w9zznphzZvbaayre9/R1T5UtKip6j3/2IK7J
i4qmF4qKvi0pKnqf+E2ZoqKvyvF3uBf8BdyIY1+lvUJ7l/6e9HemvwncA+4I
vwN/BbeHv4YnwBPgxnB3uK3OA38Jt4YbwJ/DveG34S7wN/BbcGe4F/wS3Bpu
A78Bd4S7w6/DHeBu8KtwO7gT/CbcCe4BfwNPhCfC9eH2cBe4uZ4V7gm/CLeC
W8EjM99b11RU9DL9beB29L8Ct4U7wNPgv+Et8G/wWngtPAFeB6+DTywuKrqd
cbqVvmPg6+Hr4ErwrfDNcEX4Ovha+Fj4Bvh6+Gj4Wvga+CT4Dvg2uDHxNVp9
2pn030+8j/4a8GPwI3Bl+Db4FrgFrTf38zX3MykrZZ5rEP3z4fn0/wDPgKfD
38KT4EnwHPg/+D+4H/wHPBNuBv8K/wL/CM+EZ8C/wnPhuRpDeDm8DB4BL4OX
wgPhefA8uDc8GZ4MfwB/B38Lfwj3gb+DO8ND4aHwFvhAnutAYhHPeAxcUWNP
Kw/vpXdCOwg+iLietg+8N3Er7WD4YOIujS98FHEb7RD4ED0rrQJ8JHG33g18
NHEn7Si4AnE77VD4UOIm2v7wfsQNtH3hfYhHcG8XwDXhveEz4NPhDK4MV4aP
hGvBF8AbafvB++oe6a8B19CzwtXh6vqmdC64PLEc/cfDx+tZ4bPhs+ED4Gpw
Nbgq/AB8P/wP7TD4MP2Wud2N8RzFt/AR//8e/p6x/RTuB/8Id4AHwYPg9vBA
eCD8Gdwf7gd3hAfDg+Hu8Fh4DNwJHgIPgbvCo+CR8JfwGHg03A0erXuAK3Cf
tbm3Wpp/tJ/oH0B/S3gA3B8+n2Pu4pg76WtI+5H+vvQHz/IQ/V/wPZ/MMVfB
V2qdoP3MMT9xzAn016W/Ln3Hw5fCl8JnwTfCN8LV4Jvgm+BT4Kvhq+Dj4Evg
S+Az4Pvge+Eq8J3w7fDp8L3wPbp32iquu5LrDoBXwivgwXrH8Hr4Z3g1vAoe
Bv8Fb4J/gdfAq+GP4RHwMLgd/Bs8Hm4Lj4fHwZ/AI+HhcA94NjwL/hyeBk+F
h8Kb4Y1wL3gO/CdczLj11fxi3ErgW7j/jHgZz/Ig/CDHphKvMeofom+d4zfw
2+oc8wj9D+nboS2hfxH9PeE/4dnwd/AieAHcF14KL4b7wIvhhcoRnOMN2ut6
f/RPp/93+ofDW+DN8Ay4mL8XiL/r24XLEqfS9oDL6Jq0gHPiONq//PYffjsb
zukv0bql59GzEPcK5ijPMInn2pl5DRzHOMzibyUck7Seaa7CxcQuujbHTOGc
YzWX4O3weHgH/C+8Q98Nx1fR9WknwyfpfWqew4frPet7go/VPNA6wm+38dsa
yc/1C/czSesavIv+iVqDOGYnPAUuq0RNnEwrA++mf7TWL47ZqnfKM1WivxJ9
75Z1nn6LdgX9LxAvL3af/taV37Qo63fwIu0c/vY48dGC84v0wMNaU+h/VFzw
sU1Lj29Q+lu9u/dLr6Vzvl3Wv69f2vd+qVZoSGtCa1nG99SoVD/sx/kvItbR
OgpfDF+ktQr+n+4dPhy+Eq4HnwbfA9+tdwWfp3vXugvXgS/UO4fPh8/VmMFV
lSe1xsNXwJfpe4FrwufpO4LPgqtqXYfraazgesXWAxcTm5c+18OlsXlpDq7D
354nPlfwM75Je0nPUDrmz9NfG34Wfga+EH4OfrbgMda5NGYX0P808Sn6CyUe
G83NS+j/gnvoU87jp2u8rPum/0ni46XXbVZ67aal76VB6XENS+9nQmYt15Nz
js+s5XrA53KeJ/j7Y5xnYmYt1Cv5fA1L39e4zBrvK/rHZtZ43eExmTXel/Do
zLquG/xCwdfUuOleWpTO8wOZd0fRN5PnKxBPoO8Eji0Pnw6fpjU2OcfNIJ6S
nNOnE6vQ9oSnEasm5/SZxGrJOfcP4tnJOXQWsW5yvlugMUzO1/OJ5yTn69nE
hdzzMGkYeGnmPPUrvCxzbhoIL8+cswbBMzPno77wH5nz1A/wnMz5sR88PXMO
7QNfTjucay0kzsicN7+H52XOmwPgFZnz5mB4QWad8zM8P3MO/QmemzkX94cv
StYq84gXJuuZucRayZpnDvGt5Lkwi3FuHc6vGvNX9L7p/x3uEM5zC+E3dS6N
IdwkeY7MhZslz7sF8NvJ83Q2/K6eTdeC30ueL/Pgpslzdj48K3P+/VH6OXme
Tivx+78Gvpp3vWeyTp5E3Iu2XjqQWDNZ4/1JjGRdPZFYP3nOzuA8ByRr7yka
42SNOpX4avLcn84xUzJryG/puzhcw7xD/xH8f6dyDXFN5tpkiK6TuUYYqvNl
1qhj4QeT9dVm4g3J3+0K4s20E+HVxKuTteJS4k3JGm8V8ZpkjbqMeAftVHgt
8U7aafA64gPJGm8T8f5k/baReAvtJHgN8a7kObKeeGPyOr+S+FCyVvyL+GSy
ntyqOZisc/4hPpWsr7YRn0jWpX8Tr0/WkMuJzyfrnO3EN5L1z07iw5oz8Bbi
S7TL4B3E15O11n/EF5P11b/EBslr+J+M893JuncDcTbj+TXj2YT+LZlrjZH0
b81cU4zW+8xcR4zSd5G5BhmmbypZky/SN5K5XhgOl0uuKX4j7shcd4yBd8EL
pJfgQnINMoG4gf4p8Ai4UbL226VvPFnbL07WPHWlrfleGidrwt16/+G6sRF/
f63gZ+nKmtwU/kVzFr4quaZYQpyWWWM35vjmydq1DPxZsl7dA/40WWuVhd/R
9wQXlXj9v1T1A9d8Njk3TaXvmeRcNkVzMFz/jIXPTNYDA+AlqgHg/aVBkvVD
P/rPStYPP8FP89vF/P1XuHqyjvpZ10zWUcPh18O1zUj42uRzjoLraa7CI+CL
k/XVMHgzxx4LH0M8P1mzDaK/drLuGgJvzKxpW8CrMteP78MrM49hM50ns6b9
AK6TrMeGwpvoH05/c3jfZM3ZGb4gWacNhs/V+4YHwvsla84u8D7JmrMTfHW4
NmgKn56stfrDhyRr8i/h4/Rdwr3h45P11XfwCcmarQ98TLJG/QY+MVkH/lBi
70T3UE4aNXNt1VtjVuz5fqrWvWKvA6dIy2Wueb/RXAt7CvJeTtV3rPUTrpys
afvCFZPrha/hg5NrjW7wocm1Q3e4gr515Wv4oOQapCtcKVm7fg+PKvgZ/+a7
PZD+FfAX9B+dXC/00lqdrPl7wkcm1y894AfCtf3ncCr2Gngi/28j/a01k3Mu
ylyjvVfiGk06MSeOyD1ntA5/kOxvLIZbJvshy+FhueeY5lrrZP9kJdw2ueZa
DX+U7KUshT9M9k+WwK2SfY8VcJtkz2QV/HGyr7IMbpGcgxbBjyRr9QlwGZ7l
TPgMrn1vslYfT/89yd/2OM2d5GMm6x1x/N3wXRx/G/1HwKNLXFson9am/1H6
q8C/0f9Yco0wUfcf9gVUg9yaXCOMgRczbj8wbu/CNfm7zLknOU/75Gutpb8k
uY5rD5dPrrM6wnvDC+EOcP+C3+ly3kXZ5Nqqld5Xco3WDi6GZ8Ft4K8K5j84
/pZwPf8h/VlyXdlW63nYA2oNdw7X5GvgfzLXp5/A2zJ/Ax+V2NvSO9V6Kn9B
c0HrWodkDb+OY7okexSb4O2Za9uP4Y7JNfV6XSvZ49qod5Rc27aEd2euyz6D
i+ifCn8Kd0qu0zfAe4TXJq1jtbj2M/Q/zf+bhP0d5aaLwj6mtErDsFeinNs4
7PsoR98X9sukTyqE63/popvDvoby1xFhv09a6Maw96Ecd1PY71BeOzLs5Ukj
jctd22sNPDTs/SlvHhL2CqW15uX2CLTWdQnX55pHu+hfUfC6uk+4dlKOOCzs
LUqbHRT2EKXrxub2DrTGHhz2HKUP9wvXPNJm+4frLmmnA8J1l7TWDWEPTnnz
1rCfqzx7W9hXlUa6POzZSbteEvaOpYfrhv1Had3y4TpNc+fSsPcqTVscrp/1
/V8R9qSkySfk9gWUC64Ke0PSydeEPSlptsvCvqF0chaew8qJ14Y9LGm568Oe
lDTDhtx1vtbA33J7JcpHh4c9U+ne28MeqDyB68I+l3TI3uF6Vfn3rrDvKV1x
Z9g/lQ65I+xpSnuMz+0dKGfdE/ZGpWMLYY9Aa0WV8DzXPGoU9h+lD1fl9ji0
zq/MXf9rTd6eO3fLK6gd9tNVU1wY9txVm9QJe/GqTdqGPS9pmK38dmHBGmAb
vKjgvP8fvKzgfL0TXl5wPt0BLy04n67O7b8o3y3N7X0o1yzJ7bkob67P7bMo
Py7O7ZUoN7UJ+2jSWstzexzKI8tyexzKU2tzez3Kuety+y/KuSty+x3KQYty
+ybKZZty+z7KuZvhuQXnylZhX1XatWm4zpSu3sIx8wvO9e+E/V9p6ffDnqz0
c7OwhyKd/3HYS5Ue/iCcv6WrW4Tzt/Rz83D+kzb+m/MvKFiDfRiuaaW3F+b2
aJRbTw/7BVrHPgl7u9Ln7cPepfRhu7BfKR3YMuwjS2P/xXnmFazl3gv7v6oR
jgrnIdVxHcOepvTkp2FfWJr8s7CnLN3eKex1Sn9+Hq7VtcdRLuxPSePtG/ZK
VCeOzu0zKo8/Hh5D1d1zc3uL0lSPhsdfdfoz4W9GtduD4X0R1WXnhPds5C3M
ye0nKmc9Gf4mVbM/ER5D1fJ/5PZSlXeeCn+rqtkfC4+D/IGHwnstquMeCe9V
yB/4M7ffqjw4K7ffqnw3O7fHqrxZLbyXI0/jjfC+guqgs8L7PfI3JubOi8qD
NcL7TPJPZub2dpU3q4b3peSBPBeeO6rHnw3PKdXjb4b3JFQznhvel9L+y9Tc
Pqly1pnh/Sf5J+eH98BUt54W9oyUy04M+zXSM6eE85lyaKXw3o80T+Wwlye9
dELYv5OmOi68HyD9c0bYn1LOPTa8hyQdNSO3blB+PzXsWyn/nhz2p6Q9fs/t
4Srn1gzv20nf1grv58n3mJbbF1aOnp7b/5X2OC+8nyetOz+3zyt9flLYz5Ku
m5Lbp5aWKEP/6oLrkd30ryy4Fiiif1XBdcfb4f0b1drPh3OivJHXwnsqqruP
DvuG0nuvhPdRVOv9m7teUh00PPe+guq1l8P7Sao3Xyq9B3k4FcNev/Tq5Nx+
t7RKg/CekHyASbm9eOmft8J7TqrTjwnvH0ijvlh6//Km7g/vjcnHyMOeprTi
mNx6WnXKleG9EHlQZcOesuqvkbn34VRT1wvv38i/SmHfU3p1z7DXKc35v/D+
jXyte8P7cPJeSsIeqLTuqNx7D9KfEfZSpY1fCI+/PLSNub111SMLctcSqgXq
h/fA5IFUD+/FymN8NbwPp7r4/5ZoWNo=
            "]], Polygon3DBox[CompressedData["
1:eJwtmmWgHtXVRu+9zMx75r64F4q7u7S4S3GoUGixtl+dOgWKtFAcCqW4u1tx
tyQ4gUAIIXhwQgguQb61+syPSWbNOTPvyDl77+c5d4Hd99zut0MDAwO/55+K
/+8dHhg4j53LBgcGxvcGBpbqDwz8uB4Y2IX208rAwIR2YGAz9jfl2Fy03U3/
c+h/Ov0fov+dtBfaC+1f0XYfPA/8Tbih/yj4m/DccA0/C28ObwbPDT8PbwF/
B54Hfgv+EbwzvCT8KrwDvAO8MDwN9/QKv/1f+El+7znav0P75vA3aX8B3hLe
Ap4Xvob+N9D/Ou55XXgQfhm+mvYxnH8o/a/1erSPhO+CW85vaf8aPgK+hfZb
aL8fPhg+Hz4BvsfnZbu5Sp83eB/H0f4g+w9ybDRtd8PDXG+Y6w3w+0fCt9J+
K+0P0P4MvCHtG9L+Ddpvhxu4gb+g/ZA23+YC+o+A74B7tPdo/xJ+Cd4G3gae
n/M/41jlu+bYt3nWkbTPyv6sHKtovwfuw314EP58OOfYdw22w2i/jt+7lt8b
xfFj4QfgB+BH4bFs49h/mmMN/d+j/Sdc7ydcbwWu9yDv4DTa9oFXgyfTvhvt
u8HLwm/CO8M7wUvA53ONC+l/EtdcEb4IvgQ+A14Fvhq+vrufdeDHuf658EbN
wMDa8Btcbyeu90Outzj8Lrw7vDu8HHwt599E/xs4f314PO0b0L4B7XPCr8M/
hHeEF4MnwtvB28ELwhdz/qWcfxbnrwpPoX0P2vegfXn4Etov777P6vB/4Rvh
6+H14Avhi+HT4JXh29p8m5rzp/IuL6f9Ktovo30N2q+Ar4avgNeEL4OvhC+B
vw2/w/m7cv6unL8MPKnNXN0FXhp+Bd4e3h5eCH4aXh9eH54DvoDrXcT1TuF6
K8EnwD+nfVXe5yLwa/TfEf4B/ReFj4FH0P9e+j/M/b4Mb0v7trQv4PV7eT+H
wRvCl3K9K+CL6P8t+BHOub/KGPqEvkdz/r3s38Oxh2i7kv7XwFfBa9H/KNrv
ge+GH6T9BbbX2H+dY7PR9wHaF+L3F+L3Cv1/yrHFnQ/c/5Hwb+Dl4enhf8E/
gRdzPsFHwL+Gl4Ong4+BfwYvYfyCj7I/24f83kf83qy0/YptWdqnpf1o2vaA
F/X7wYfDu8OLGEvhw+Cd4HnhL7i/g+B/wBvBC9N+MnwQvDG8CHwK/Ad4Fecn
fBz8N7YFHHvOadp+zLYA+19z7BDaJvTyfo+CN4Z3pn0+2r+ED4Z/BM8PfwX/
E168JJ49Db/Lu1yyZP4/A78HL1ESn8bDU+DNuI+/wfsZU9nfmmvcZ+zjN1/v
5RvfBN88mG9/POd/j76r0PdM3yfXORDepxtTG7L9hf39jfHsX825B7D/16HM
4X9z/nfZX5n9Mzj/YHgTeFH4VPg5x1yVmD8zbU8bM+EJcAv32N5g/0Z+96nh
xCTHyg11YtXEXsbvv+vEs5d6GX/H1Yn3xnBj+QUcG9NLDHesnlwnto9nm0D7
sxwbLonBznXn/DP0rdo835/of47xnT5bwUtz/6fBf4ZXh+eA/wPPAn/o+Kf/
81xrRmMofCc8YTjP+IHjv86zm6Me5/eeGEzuehx+DB4Df93LO3iL/ZvrvJsF
4CF+7zH4DXgm+H3a74KfhaeHp8B3wM/ABX4TvgkeN5x3+DTXHz+Yd2ufF+CX
BnOuOcJ8MrFO7viUbZo6Occ84jO8WCXH+my+s7fNn3Xe5YLwNJz/OPwmvHBJ
PHwSfns49zCe858ZzL2Z45+Axw4m9xsDPmZ/ZJ3Y4DfwWxwJb8T73Zf2ta0/
eN8nOJ/gdeB54BPhheAKHkP/tzh/T47NzP4sHPuWsaKknhnHscm0/wleDZ6d
84+n7x/hVeHZHLvw//W75x/Ktb/B9rn5kmMTOX8O+FP4PvgleNGS/P0U/A48
O/wJ7aPgF+F54K/hR+BX4fngAfo/Cr8Gzw8PwqPh1+E54c/ofz/8MjwXPNX6
A34FXqSknhgLT4KH28xv5/nZ3Psu1li839c4p6bv99nmov0z+v+Dtq3hmeEp
8L7wFvAM8DvwX+Ht4dnhj+D94S3hGeHJ8N7wsWzrsL8ux35bMv5fNZ9wbA/a
toJnou1deB94O78x/CG8H7w5PD08Cd4LvqokduxtTG8zx6wVrRmde9ZU1la3
8Rtv9ZJjzDXGgPfhz3uJHZdyzmPDmUOO7avqzC3f3yRrW/in/cxp44M1n3N9
iPaJ7F9D+xP0nxt+B34Y/lk/8fULeAL8c/hQtuWtjczRtD3BNdawNuPYzLSN
hdeC14RnhZ+E14TXcEzCY+BvOzbhmax/4JWNl/CM8Dh4PXg9eHbrL3hh8w3c
9jOnPqoyZ5xrxtTv1YnZxtrH6L8S+ytxbAbaHoKXgpeEh+GzzJns/4Zjp5aM
GcfOn+Bz4NPNObT/GD4KPslvCm9tDoEf5npLs78Ux/q0jYZXhFeEp7c+gJcx
XsLTwr02uWNfa/A2OfK7dXKEudMaxFpkJM/zQa/7xuyfWufbT0uf5+Hb4d05
tw8/B98G79ZPTW5t7jmf9VLTWttas3/ay5h4yFpnMGPF+GXsv5Xzd+0nR1gf
/6NO7lATqA2s6d/sRQOphcy563PuDmxzsP8xxw7g/B+wPUX/cfT/mP7fM2bQ
/intf/dZ4TnhT8yj8Bfeo/UgvBP8JTwavhLeGZ4KPwJfDv8Qrjj/KfWO36Sf
Z/BZLoN37PSTsfRa5wx8L+94OusbeAj+iP73Wc/C37ee7EU//Qfeop937rs/
z2/ST8629lcDmMsn036X9TLHdrBeVSPCZ8Lb9/O9nJunwdv0UzP81Lk2lFpi
Eu13WP9zbDvHL3w7fDq8bT/v2G91Sp13b/z33R9RJzc/30v9/C94M2NbL/X4
CfCW1re96IET4a36qQ/UF8fD37H2g0fB5ztH4Bd6qU+PhTfvRyOr9Q6vo52f
66V+PwbelPZne6nXj4Y3gf/dZqw5phxb17SJ159VqccubZOf36uSr41hxrKl
mujX0+E94bWb1PdnwL+D12lS/59ZouXXbaKvrOE+r5IDrO2MYVM7Nrb9Gp6h
ToxeyfnP/Z5D29/r1N9Hl+iJZbnefP3ck/dmTWJtcUyJ/liuid40R35a5ZnM
nYeU6IfFmvgFh5Xoq8Wb6P3R/N7Z9D2wjr45vES/LdFEvx9Rog+XbOIHqInV
xtbQ1tLG2C+qxFhj7/v8/pdVcubS8G9on7FOTlmlpMad2vU3Nv+K9unr5LAV
Su5JL0IPwXt1Tj1fJYY415xzz1WJIc5F59izXT34v7nHdib7+9fRZ3oieiN/
q6MHnXMTunrVueiYerKrZxxrxlBj6QZN9LOaVG2qJ/B3659e9PHBdfyLp3rR
k4fU0bPGI2vXg+ro41+yTVcnZy7D+Y/SfhbtB9TRl+bcD6rUoObisb3owX/W
0at+A70UPRm/jTlMr0DN4Psb14s+P5RjG9D2i35ihzFkuZKYYL32ZBef/1Wi
/5dvohcHu+tNy7FNS2qSj6vUQNYqY9i+HMw39lvrIeklqanUVtZMn1Spqayl
9JT0lvScdlQfdPWKY8Cx8HiXjx0DzgU17iZNxqja1xrwg07vWb+9XqLvFunq
mddK9N3CXT3yoTVDlRpsRWtbtiUdv129pGazlnyvjpYb19U3zjnnnnNab2qr
rl55s0S/LtbF+7dK9OjiXT5wDuiN6Wk5N94o0bOLdvnEHG2uNsf+vKQGsBZQ
8x8An8j2C/ZXa6LnTzEGWH808V/Ut9Yf/Sb51xxvrl+jif/2RMm36nf1jDXp
5Coawlr1uBI/ZMUmfoM5wFywUhO/7tgSP2aFJn7KUDdeHJ/WdmowvTdzqtrs
qa5+dI46V5/s6j/PcazpYehl6OEcSNvJzmnroyb+z0nwL+HVm/g5Y7t61Tnh
3NDT1ABdq4nXqYegl2DNtJvnltRfw03qFWsov71jQK3vGHGsPFGn9jdHjq2S
c82dZ9P+R3N/E3/oLPgP1mdN/Cg1z/vd/FMLWXNZe1nT/d5YYAyoUwNsUFLz
v1tFI6oFrPmnVMkZaoG/0H+uOjX7Jv4WPHudmnwdcwM8W52aeq2S+tpn/aCO
H/hnY2ydGmSjEg9hmTqeh96CmmfjOp6FWui4Lh4bn/Qu1EAbdfFZbfRHv1Gd
mme9khrPWs8a83e+O+5/oI5GXblEE29SR/OrlX/Xj1epxlRr6mEsW8ez0dvw
m+vPLdBkLOzVxYd5uvGkJpmnixdqlb1K/OY5m9TP+3Xf03fgu3COL9J9X7XM
3iW54BtN6nP1pHNv7ib1uces3R0j9tUj1ivWQ9mwRPO9VUXzqgWt0a3VV+ne
lznf3K9G1JtRU81fx+NRa6mB5qvj4aiNjCnGFmOC2kxN93YVjWI+V2PNW8cD
UnvtUxK752qiH4wJ6o22SazQk7LWXqaLp8YcY48xxdrTmGJsMQZauxqDjEXG
KGtVPezhLh9sDG9b4se9z7Fp+onBxqLP68RmNembVTwKteon8FAdvbw6fB9z
5mTa9qrjjz4AnwrvXcdvNQfqZy7YJDf+lm2mOjF+tZKawPWBhZrUCn4jtZQe
gN9Oj1yvXE2/bklNOrpKDW2tao38ShVNau2sZniniqZTS1gjT+z8J2vnhznn
DPb3q+NvjoBPhP9cx79WI7zdfX+1wyjaT2L/L3X81o+5n8E6HsiqtN9P+ym0
/7WO323N5FqLY9ZaSs0yqfveahk9gtereF56B3qCy9XxPPUK/eZqR2O6Y0GP
Wa9ZD2DNEs9ylW486mXqia5ax9PQKzXmLdWND2OhMc/YNE2TWKiHsmWXv/RW
pu3Gk/HCXOKY8typdXL3CV2+27L7Hq5puLahB7J2SY7ST56/Se7SI3mjiiel
d6JHu1b3PfVuj+6+71rd7+1aoicHOb/Xjwe7chdPvXc94LXreEB6w3q8q9fx
5PR+jQlqa+eIscIcYKwaapIb9JRXq+MB6TW/UjJXnaPO1VdLvFrnsHP52ZLY
Zww2Fn9Ucu/es/f+ccm9+Ew+2ycl3oj36L1+XhILjbnG3qnwpkOJkcbKXbrf
G2jiLXxaEnuNycbmz0pitTHZ2Dyl5Fv7Tnw375V8a8eAY+GDknfhM/qsg220
vJ6K3opzepYuHjvXfccL1pnzvns9Hb2NGZp4PXoAav9lmngDet6u3TlHnatf
lIwdx4Rj40P4W0P5Jn6b90vetWPSsXl9iV7U09Hfm41t3Tqex/4lMd/Y/3ad
2sIcam0wc9P5Gb2sn+1bZ+3SOejahzW1c9Ma/YJu/dO+zkHXnqyxnZtqLNda
rGHVXsYk14KsgY1V1jzbd89nLaRGcy1GjaR2m4b3+bOhaFy1btXlt9m6/GPM
OKnzn40l5xpzh+LR9dvkTGu5mZrkUj0LvdFL6ngZxkzXlqzhjaUj2fYaiiet
X2XN4VqYNZq1iBpDva7eVnuoGV2bs0ZTS1qzuLZlDWctM9Smr+eo9fXQXYtT
M6udp+PYCnXm4J70v6GNX2mNbK18Y5ta2Zxv7r+lTezXM9U7vrlNLDQnmBuu
b6PlvlJzwtfBXw1G46n1rm2jZa3n1Xbnt4kV5hhzzYVtYq8x2FzpGuHGTTS8
a4c3tak9jMHG4qvbaAk1rFr2sjZa1xrNWu3KNt6ZGkWtcnmb2k3NoHb4b5tc
ruZWe1/SplazRrNWu7hNrWwNZy13QZtcaI1grXBVG+2jplHbXAS/O5ga21p7
YkktYI4315/cZu1Vj16v/sQ2Wut/mkttUuLt6ZnpnbkGe26VNTrXZq8rWbu5
sYp+O6ON/6lnr3c/AH9/KB6hXqEewNZ11pj1Br4q8eKc087t/br4NW8T7+/L
bv6bI8wVp7RZS9DT19s/HX5xMGsKri2c1cZPdY3H9Y7j4ccHs8ahH3tCm7WP
MVX81vPa5D5zhLnizDZrDS9VWd/4T5u1EddMXDs5rY32VoO7/nBqm/njGpLr
JWe3ye3meNdjzm2zfmSONdeqWVwLtgZRyyzcxTPfgVpHTetaqDWpWveGEr/q
tirrczeX+GF3VvGjRpZoBT0AvYBb4Lvhu6r4SzeW+F+3V/GP7ihZextVxa+6
qcRPu6OK3+Q39FvqaanNXaPz+55UZ+3OmtNafZYmtaiegWvhemJ6CbeV+F0j
qvh7ekCuxeqh6Q35TiZ29ZF+gR7Edd3815u4vcQvHFnFX3O+ua6nR1/zLkeV
eJ1qJLWSnqfPc2EdL/TWEj9RT1f/TQ/CtXM9R72JR0pqH+eztZXvxHfjO9Zr
Myfc2vmveoEv0n/uoWgitdHLJbWxmkBt8FKJNlAzqB30RFx717PTK3m+RAup
wdRiz5VoMTWN2mZ8ib63BrUWnVCitdRYaq1nSmK7MV4t4xi4rVuPcO32hRKt
puZSez1WoieNJ3oz98KPDaZGtVbVQ3F+n1vH+x5R4h053/VaXKN27WZEnbXr
e0pq20er+K13lfjDD1fxT+8s8YP1I/VfjbHGWmP28o7FEr/5kSr+qx6ff1ti
jab3p8d0bafX9Z4cg45Fx6xeqJ6ef7ugJ6rXpyfm3y64Zq1XZs3s3wa4Zmct
rSfh3xroEepVOIYcS45JvVvH5IjO79eLdg44FxxzermOGcfOiC4f6eEbby6u
4+275mP8OKfOWpCegH/roeeoV6Bn4N+O6DnqJUzpJX6cXefvD9z8WwTXjKd0
fp35cNNu/ey8ktztGpFrRfpLrnu7hlHa5ERrlRmb5Eo9FWsrayy9Fjf312yy
1qIn49/G6AHr1TxaokXUAGqBd7t6y5rf2v+dEm2sZle71918u77O2t5DJXPX
OayWua/EuzQe6k06BhwLetR685NKanlrerWiY8ax45jRix9N++TBaCS1kjHN
2GZM0ns3hhnLjHl655NLtIkaXi1vzWYuma9JLecYc6w5RvX+/RsR89tFdf52
xJhubDdHuJb9INsLg/Fo9Wod4451x6xrDeaIMZ3/6FrdAyVerh6uXu79JV6u
Hq5e7sPd/FEDqgX/H9ctJME=
            "]], Polygon3DBox[CompressedData["
1:eJwt2HW4VNUWAPC5yNx7544IdqGIQSgKgkhZgAImxlMRA7sFFMV45jOwxaJL
VLqVfLRIKd1dSkpLC/hb37l/rO/b6zdr733mxN5npvTDzW5vWiSVSq0WadE/
k0rN0/i7aCq1R2wpSKUWsrNzU6mr+TXi5GwqNZMVZ5Xkl4pibH5+KrVce5c+
FbQvFnPF72yrsbblpFIl5ZPE92wSm8z+zkulfmU/sF/ZFLaHvW+OD1l39r34
xbhT1PVlv8tnqDukbirrx2awmewfNpAN0R7M6jnOtLHGsY7qRrMxPtuibgFb
wXYbu5L2pWK2+IX9oW69upPkX+jfg01hU2Nu9RN5FzZOPl7dNuNtUXeF+e7n
D4iLnJdf1HXVHq9ugrrt6sazTmwMG8v+YgvZyjj3xq6sXUVMEJ3ZWHXj1G1V
N4f9xv5iW9mZ8tXmvdi8t/CGopR5F/FV2nuMd5l2VTFTjGYr9F2p77HyWWIM
W8lWsWLyJWIN26dvde0a4v/mWMv2swPioJjEdrITxIniGPPOiFrt5cZbYbys
fKn4gx3S5wrtK0VbfYeyheoWiQU+m8pSvkdpfq7IM97i+H7ae31+uXY1sUz8
yf5hV2lfLeaFhxnrsHkvkk8WP7LJcd3YXufvI3O0ZSPYyLjfjDFG3bdsmHyE
uvXqlrP17LDPr9GuHfey+JktiGNWl5avE9tYcXG8h+mW+P7ia/nP6oap+8N4
Xcw7nu1gO1mJuAfYWLaNbWfF43rHvcq2sx3sONaGDWFr2TpWJI6XDWZr2FqW
E/cZm8B2sl3seNaa9WKL2WK2Ly+5n3umk/Me57+R8/wl682WyJeo26+uHRvO
NrANLNd47dkItpFtZHlxP7KM61aD13QOnmIzWJbVYlewp+P8sQJWk9ViTxbe
V+sK75+4j5plk2sc13pkJrkPm2aT+2WY9nrz/imasI5sFNss3+xYMvp0YCPZ
JraJ5bOvWB+2lC1lB3y3b9ggtpqtYUfZ12wgW8VWs5S+g9iiuBcjHHMZNoAt
kKcj2PmsB5suP6jvQX1Pj3uPTWMH2AF2Wqx9bEo8W2wfO4V9xr5jc9hctsOx
9GQz4v5jR9jZsUayqfEMsv3sVDaYLWb5EY6lbOE6FuvZsEyypjyTTdaTWFeG
Z5J14VnWXXtyPFvG22u8k33+Hfs1naz/sQ88qq4bmxhru3y3uhPUTWfHuJZV
eBXzPsQqikviGckke8FT+v6kvVS7IEJd+Vib2RJ5JoKVK1yfYp0akUme9+ey
yR4Se8nQTLJOP82maRcxb2V5ZX0fzE/2oxK5yf4U+1RrdbPY8ay2vLa6ZuqO
igtYPVafvSffK4qxS1gl9px8nziOVYz9jTWV7xHHsotZRfas/JA4lVVnNVhL
ecq8ZVh91oC9zw6Ik9nlrBp7UX5QnMKqsersJfkRcT67jtVj78oPi7PYVbH/
sjfk/4iS7Mr4vuz1WA/FjliD4llit8YaLv6K/TnWJ3ZTrGni79jHxSnsDvl+
cZLxqrLLWYtYr8V2eYl4LllD+W6Rp64cK88el+8SuawsK8cei31HbIoXCteh
nnb9mFPkqyvPL1T3hLyXczVTfsR9ddR9dRb7lHVjs9kctjPeD9hudl6Evrep
m8NONF5dVpc9H3sAO51dz25gL7MF7Ex2I7uJvcYWsXPYrexW9iabz85gN7Ab
2atsLjuNNWDXs1fYbHYCq8PqsOb5yTtSqdxk7409uG022ctycpP3o3hPasWu
U3tt7OuZ5Py8lE3OTZyjiWwza8kmax+M8xTvEOZo7PMp7FDkogK7Jz/Zf3cV
7pWxZ76u7+esu/Zc52+e87crL9kfY58cm0n2tBeyyX4W+9o4toG1yCb7cuzP
YzLJ/vp8vL9ob9E+U5Q0740+ryvqiPE+28hfzCbvjvO1i8Z7gHiC9WNztYuE
6XuuPn3ZHHlOOCvNNrNaztUzsS6x9uwn8YG8s+/R2/dY5HsMYe+zjqwXW8gG
s/dYe9aTLWA/s1asK+vDFhe+m11pjudijvjM8Q1V94l2T3X91S1TN4i9G9eQ
9WDz2SZ9a+r7dKyljq+dmg2sOnsy1jnWhm1kNdhTsVaxtvEMsdrs+TifrEs8
p6wOeyGuBesazy+rwh5hj7AvYy0Un8v7O5ZBjmWlY9mprq66FnHN1HWL9w92
DWvOmrPObCu7mjWLPZV1imefVWNPsCfZt7E+sKtY09hnWUe2nJVjjdg97IPY
N2Kfkvd1LAMdywrH0p+9zfqx79hsVovVFKMzyTtfc+d5RX5yjx0pSO6buoX7
zKR0spfHnr7KZ7/FdWfz473EeEVjn4n9ls1is9kRc6zMT+67owXJ8xTP1Wjx
DRuqbri6P9WNZW3Y8HjXYxvyknfZeKcdVfg+G+8bfeRvaPdQ10XdDHV92Zus
F+vKZrIf2EusDWvLJrMfWUvWjrVjU1gP9jLrwNqzqWxYrG2sNxvAlscez15h
nVgHNo31Yq+yLqwjm84GsHfYANadzWH92FusD+vGZrHe7HX2A+vMfmfTWH82
k81ih9kK372863sPb+z6fqhmJbuQNWb3so/iuYy9QX66OIPdLd8S+1nksSaw
RnGvxT4lP1ucw+6P+yr2KflZohS7T55jjgrmuJk1ZJ/GvRv7XtTEGsYeiOde
3cfyUY55lGNeUvh78KN08s4e7+7Xum471aaNV4aX1ffReN7E0TiOWBdZk3je
RFF1F7Ay7BH5QOMtlOdGsAtYbzYr7ivjp1gp1ofNTic/kHPYObHesP/Jh6j7
yfHNc3wj+RdsIBvMVrENbE/ss+JUff8jX52frPM5jr+B9vWxV4p97LQ41+ru
ivtb7I1+4exO+TLzlvU97maNWCv2MWsvn2beaebdWPgbp106+a0av1kbmquA
NdD3Mf64vtlM8rvxktzkt2r8Zu2kbg2ryJrIm6j7zBxrWSX2IHuQfc7WsUvZ
Q+wh9kU8U6J1OvndHb+/VzuWVeouUncvv0/dx/FuwSqzh9nDrHXMEfeR/DhR
gt0s/168KL9WbRvjTTLeUn3Pk9/B71D3jppjWFV2F7ubfcM+ZF/JJ8Z/B/qu
0bcV+5JNYBPZWvYJ68Cms+lsEyvCLjPenfwu430dewJ7Td4t1rr4LV+Q2H/T
yf8T8T9FNedvCTtX39v57fq+re9iVprdxm5jb7G8THIN41rW91m+/F9R7IGn

            "]]},
          Annotation[#, "Charting`Private`Tag$3585#2"]& ]],
        Lighting->{{"Ambient", 
           RGBColor[
           0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, {
          "Directional", 
           RGBColor[
           0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[
           0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[
           0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], 
           ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}}, {
      {GrayLevel[0], Line3DBox[CompressedData["
1:eJwl0j1PU1EABuBTLFXwA4nOkAZDxERnB9zVFoGKmEhCYtXEVtFRmdW2GzHG
Fk2IMU01jAYYmerGhgKVLyWGoH/AOPqcOLx93nN67r2npzedf5x7lAghvJQH
Suy3ffzkUCqEk5xgL4u8wGleYoVZ3jscwq+4Tpp6yfVJmZKiuTJPyzNZcM20
uT59Wa/oK6xxkx/4m0v8y89865791j+XL8YFjsvlQyF8Nb7CNV7lOjPcYJat
+Dv4jdc4LJv6CLc4ym3muMPr3OUYv/MGf/BuMoSznvlC9uJZ8KacsrdV43Y2
+ceeF3nABlusctb3Z6wv61U9rU/KU+M77JZP1haML+p1/Zb+mhmWOMgnPM/7
7GHevfb50DVdcZ7nZL4thBPGH3mcDR5jnUf5np18xw7O8Ug8a74Rtw01puIe
2M5XTMZ3hY4lzLAt/v8mBxL/359/6vFFlA==
        "]]}, 
      {GrayLevel[0], Line3DBox[CompressedData["
1:eJwl0kkuREEAgOEipk6IAxCJrU5YcwLDzoZYWhha60YbI6YFbdyZhzZGRESE
E5DYEwfQcQDiAMT3YvHnq3rvVaVSebXd6fZUQQhhUauFIWyZLHFCz6UhXJi/
8YEffOI3X6NFZSHkWckv1vCX9WxQhT3aWM0uxtnPJk6yhVl2MhYLYZrr6tWy
5tVTHEJf9Iz97GMi2ocDTDDJAQ4yGamUcYpppjnEIQ5zmCMcYYYZjrK1JIQZ
bmhMK1rQmTP2cJMdXGQzx9kYnY117GQVW6L3KjeO88edVPOTFXznrzt84Rcf
mec9S9zDlHVrOjfPck53Rc5hfstT3vCE1zzmFXO85BEveMjT6DsdGOe4z0Pu
cZ+73OUOt7nNNvcwW/j/P/wBrKZGGA==
        "]]}, 
      {GrayLevel[0.2], 
       Line3DBox[{1613, 1889, 854, 1612, 2546, 1812, 1614, 2547, 1813, 1615, 
        2548, 1814, 1616, 2549, 1815, 1617, 2550, 1816, 1618, 2551, 2316, 
        2625, 1619, 2317, 2626, 1620, 2552, 1817, 1621, 2553, 1818, 1622, 
        2554, 1819, 1623, 2555, 1820, 1624, 2556, 1821, 1625, 2403, 2557, 
        1822, 1890}], 
       Line3DBox[{1627, 2318, 2627, 1626, 869, 1628, 2558, 1823, 1629, 2559, 
        1824, 1630, 2560, 1825, 1631, 2561, 1826, 1632, 2562, 2319, 2628, 
        1633, 2320, 2629, 1634, 2321, 2630, 1635, 2563, 1827, 1636, 2564, 
        1828, 1637, 2565, 1829, 1638, 2566, 1830, 1639, 2567, 1831, 1640}], 
       Line3DBox[{1642, 2322, 2631, 1641, 2323, 2632, 1643, 2324, 2633, 1644, 
        2568, 1832, 1645, 2569, 1833, 1646, 2570, 1834, 1647, 2571, 2325, 
        2634, 1648, 2326, 2635, 1649, 2327, 2636, 1650, 2328, 2637, 1651, 
        2572, 1835, 1652, 2573, 1836, 1653, 2574, 1837, 1654, 2575, 1838, 
        1655}], Line3DBox[{1657, 2329, 2638, 1656, 2330, 2639, 1658, 2331, 
        2640, 1659, 2332, 2641, 1660, 2576, 1839, 1661, 2577, 1840, 1662, 
        2578, 2333, 2642, 1663, 2334, 2643, 1664, 2335, 2644, 1665, 2336, 
        2645, 1666, 2337, 2646, 1667, 2579, 1841, 1668, 2580, 1842, 1669, 
        2581, 1843, 1670}], 
       Line3DBox[{1672, 2338, 2647, 1671, 2339, 2648, 1673, 2340, 2649, 1674, 
        2341, 2650, 1675, 2342, 2651, 1676, 2582, 1844, 1677, 2583, 2343, 
        2652, 1678, 2344, 2653, 1679, 2345, 2654, 1680, 2346, 2655, 1681, 
        2347, 2656, 1682, 2348, 2657, 1683, 2584, 1845, 1684, 2585, 1846, 
        1685}], Line3DBox[{1699, 1925, 1924, 2730, 1698, 1922, 2665, 2421, 
        1697, 1920, 2664, 2419, 1696, 2417, 2663, 1918, 1695, 2415, 2662, 
        1916, 1694, 2729, 1914, 1913, 1693, 2727, 1910, 1909, 1692, 2723, 
        1906, 1905, 2724, 1691, 1903, 1902, 2722, 1690, 1900, 2661, 2411, 
        1689, 1898, 2660, 2409, 1688, 2407, 2659, 1896, 1687, 2405, 2658, 
        1894, 1686, 2721, 1892, 1891, 1893}], 
       Line3DBox[{106, 314, 751, 107, 315, 752, 108, 316, 753, 109, 1133, 317,
         110, 1134, 318, 111, 1135, 319, 112, 1136, 320, 754, 113, 321, 755, 
        114, 322, 756, 115, 323, 1151, 370, 116, 395, 324, 1159, 375, 117, 
        398, 1137, 325, 380, 118, 401, 1138, 326, 385, 119, 1172, 404, 327, 
        386, 120}], 
       Line3DBox[{1713, 1980, 1981, 1961, 2746, 2423, 1712, 1923, 1960, 2745, 
        2422, 1711, 1921, 1959, 2744, 2420, 1710, 2418, 2671, 1958, 1919, 
        1709, 2416, 2670, 1957, 1917, 1708, 2414, 2669, 1956, 1915, 1707, 
        2728, 1912, 1955, 1911, 1706, 2725, 1908, 1954, 1907, 2726, 1705, 
        1904, 1953, 2743, 2413, 1704, 1901, 1952, 2742, 2412, 1703, 1899, 
        1951, 2741, 2410, 1702, 2408, 2668, 1950, 1897, 1701, 2406, 2667, 
        1949, 1895, 1700, 2404, 2666, 1948, 1979, 1978, 1987}], 
       Line3DBox[{1715, 1976, 1977, 1962, 2747, 1847, 1714, 1926, 1963, 2748, 
        1848, 1716, 1927, 1964, 2749, 1849, 1717, 2424, 2586, 1965, 1850, 
        1718, 2425, 2587, 1966, 1851, 1719, 2426, 2588, 1967, 1852, 1720, 
        2732, 1928, 1968, 2349, 2731, 1721, 1929, 1969, 2350, 2733, 1722, 
        1930, 1970, 2750, 1853, 1723, 1931, 1971, 2751, 1854, 1983, 1932, 
        1972, 2752, 1855, 1984, 2427, 2589, 1973, 1856, 1985, 2428, 2590, 
        1974, 1857, 1986, 2429, 2591, 1975, 1982, 1858, 1942}], 
       Line3DBox[{1725, 1933, 2351, 2734, 1724, 1934, 2592, 1859, 1726, 1935, 
        2593, 1860, 1727, 2430, 2594, 1861, 1728, 2431, 2595, 1862, 1729, 
        2735, 1936, 1863, 1730, 2737, 1937, 2352, 2736, 1731, 1938, 2353, 
        2738, 1732, 1939, 2354, 2739, 1733, 1940, 2596, 1864, 1734, 1941, 
        2597, 1865, 1735, 2432, 2598, 1866, 1736, 2433, 2599, 1867, 1737, 
        2740, 1943, 1868, 1944}], 
       Line3DBox[{1739, 2355, 2672, 1738, 2356, 2673, 1740, 2600, 1869, 1741, 
        2601, 1870, 1742, 2602, 1871, 1743, 2603, 1872, 1744, 2604, 2357, 
        2674, 1745, 2358, 2675, 1746, 2359, 2676, 1747, 2360, 2677, 1748, 
        2605, 1873, 1749, 2606, 1874, 1750, 2607, 1875, 1751, 2608, 1876, 
        1752}], Line3DBox[{1754, 2361, 2678, 1753, 2362, 2679, 1755, 2363, 
        2680, 1756, 2609, 1877, 1757, 2610, 1878, 1758, 2611, 1879, 1759, 
        2612, 2364, 2681, 1760, 2365, 2682, 1761, 2366, 2683, 1762, 2367, 
        2684, 1763, 2368, 2685, 1764, 2613, 1880, 1765, 2614, 1881, 1766, 
        2615, 1882, 1767}], 
       Line3DBox[{1769, 2369, 2686, 1768, 2370, 2687, 1770, 2371, 2688, 1771, 
        2372, 2689, 1772, 2616, 1883, 1773, 2617, 1884, 1774, 2618, 2373, 
        2690, 1775, 2374, 2691, 1776, 2375, 2692, 1777, 2376, 2693, 1778, 
        2377, 2694, 1779, 2378, 2695, 1780, 2619, 1885, 1781, 2620, 1886, 
        1782}], Line3DBox[{1784, 2379, 2696, 1783, 2380, 2697, 1785, 2381, 
        2698, 1786, 2382, 2699, 1787, 2383, 2700, 1788, 2621, 1887, 1789, 
        2622, 2384, 2701, 1790, 2385, 2702, 1791, 2386, 2703, 1792, 2387, 
        2704, 1793, 2388, 2705, 1794, 2389, 2706, 1795, 2390, 2707, 1796, 
        2623, 1888, 1797}], 
       Line3DBox[{1811, 1947, 2720, 2434, 1810, 2719, 2402, 1809, 2718, 2401, 
        1808, 2717, 2400, 1807, 2716, 2399, 1806, 2715, 2398, 1805, 2714, 
        2397, 1804, 2713, 2396, 2624, 1803, 2712, 2395, 1802, 2711, 2394, 
        1801, 2710, 2393, 1800, 2709, 2392, 1799, 2708, 2391, 1798, 1121, 
        1945, 1946}], 
       Line3DBox[{1989, 2308, 2977, 2211, 1988, 2866, 2212, 1990, 2867, 2213, 
        1991, 2868, 2214, 1992, 2869, 2215, 1993, 2870, 2216, 1994, 2871, 
        2435, 2753, 1995, 2872, 2217, 1996, 2873, 2218, 1997, 2874, 2219, 
        1998, 2875, 2220, 1999, 2876, 2221, 2000, 2877, 2222, 2001, 2878, 
        2309, 2223, 2310}], 
       Line3DBox[{2003, 2436, 2754, 2002, 2879, 2224, 2004, 2880, 2225, 2005, 
        2881, 2226, 2006, 2882, 2227, 2007, 2883, 2228, 2008, 2884, 2437, 
        2755, 2009, 2438, 2756, 2010, 2885, 2229, 2011, 2886, 2230, 2012, 
        2887, 2231, 2013, 2888, 2232, 2014, 2889, 2233, 2015, 2890, 2234, 
        2016}], Line3DBox[{2018, 2439, 2757, 2017, 2440, 2758, 2019, 2891, 
        2235, 2020, 2892, 2236, 2021, 2893, 2237, 2022, 2894, 2238, 2023, 
        2895, 2441, 2759, 2024, 2442, 2760, 2025, 2443, 2761, 2026, 2896, 
        2239, 2027, 2897, 2240, 2028, 2898, 2241, 2029, 2899, 2242, 2030, 
        2900, 2243, 2031}], 
       Line3DBox[{2033, 2444, 2762, 2032, 2445, 2763, 2034, 2446, 2764, 2035, 
        2901, 2244, 2036, 2902, 2245, 2037, 2903, 2246, 2038, 2904, 2447, 
        2765, 2039, 2448, 2766, 2040, 2449, 2767, 2041, 2450, 2768, 2042, 
        2905, 2247, 2043, 2906, 2248, 2044, 2907, 2249, 2045, 2908, 2250, 
        2046}], Line3DBox[{2048, 2451, 2769, 2047, 2452, 2770, 2049, 2453, 
        2771, 2050, 2454, 2772, 2051, 2909, 2251, 2052, 2910, 2252, 2053, 
        2911, 2455, 2773, 2054, 2456, 2774, 2055, 2457, 2775, 2056, 2458, 
        2776, 2057, 2459, 2777, 2058, 2912, 2253, 2059, 2913, 2254, 2060, 
        2914, 2255, 2061}], 
       Line3DBox[{2063, 2460, 2778, 2062, 2461, 2779, 2064, 2462, 2780, 2065, 
        2463, 2781, 2066, 2464, 2782, 2067, 2915, 2256, 2068, 2916, 2465, 
        2783, 2069, 2466, 2784, 2070, 2467, 2785, 2071, 2468, 2786, 2072, 
        2469, 2787, 2073, 2470, 2788, 2074, 2917, 2257, 2075, 2918, 2258, 
        2076}], Line3DBox[{2078, 2471, 2789, 2077, 2472, 2790, 2079, 2473, 
        2791, 2080, 2474, 2792, 2081, 2475, 2793, 2082, 2476, 2794, 2083, 
        2919, 2477, 2795, 2084, 2478, 2796, 2085, 2479, 2797, 2086, 2480, 
        2798, 2087, 2481, 2799, 2088, 2482, 2800, 2089, 2483, 2801, 2090, 
        2920, 2259, 2091}], 
       Line3DBox[{2095, 2921, 2260, 2093, 2922, 2261, 2097, 2923, 2262, 2099, 
        2924, 2263, 2101, 2925, 2264, 2103, 2926, 2265, 2105, 2927, 2491, 
        2810, 2107, 2928, 2266, 2109, 2929, 2267, 2111, 2930, 2268, 2113, 
        2931, 2269, 2115, 2932, 2270, 2117, 2933, 2271, 2119, 2934, 2272, 
        2121}], Line3DBox[{2120, 2817, 2498, 2118, 2816, 2497, 2116, 2815, 
        2496, 2114, 2814, 2495, 2112, 2813, 2494, 2110, 2812, 2493, 2108, 
        2811, 2492, 2106, 2809, 2808, 2490, 2104, 2807, 2489, 2102, 2806, 
        2488, 2100, 2805, 2487, 2098, 2804, 2486, 2096, 2803, 2485, 2092, 
        2802, 2484, 2094}], 
       Line3DBox[{2123, 2499, 2818, 2122, 2935, 2273, 2124, 2936, 2274, 2125, 
        2937, 2275, 2126, 2938, 2276, 2127, 2939, 2277, 2128, 2940, 2500, 
        2819, 2129, 2501, 2820, 2130, 2941, 2278, 2131, 2942, 2279, 2132, 
        2943, 2280, 2133, 2944, 2281, 2134, 2945, 2282, 2135, 2946, 2283, 
        2136}], Line3DBox[{2138, 2502, 2821, 2137, 2503, 2822, 2139, 2947, 
        2284, 2140, 2948, 2285, 2141, 2949, 2286, 2142, 2950, 2287, 2143, 
        2951, 2504, 2823, 2144, 2505, 2824, 2145, 2506, 2825, 2146, 2952, 
        2288, 2147, 2953, 2289, 2148, 2954, 2290, 2149, 2955, 2291, 2150, 
        2956, 2292, 2151}], 
       Line3DBox[{2153, 2507, 2826, 2152, 2508, 2827, 2154, 2509, 2828, 2155, 
        2957, 2293, 2156, 2958, 2294, 2157, 2959, 2295, 2158, 2960, 2510, 
        2829, 2159, 2511, 2830, 2160, 2512, 2831, 2161, 2513, 2832, 2162, 
        2961, 2296, 2163, 2962, 2297, 2164, 2963, 2298, 2165, 2964, 2299, 
        2166}], Line3DBox[{2168, 2514, 2833, 2167, 2515, 2834, 2169, 2516, 
        2835, 2170, 2517, 2836, 2171, 2965, 2300, 2172, 2966, 2301, 2173, 
        2967, 2518, 2837, 2174, 2519, 2838, 2175, 2520, 2839, 2176, 2521, 
        2840, 2177, 2522, 2841, 2178, 2968, 2302, 2179, 2969, 2303, 2180, 
        2970, 2304, 2181}], 
       Line3DBox[{2183, 2523, 2842, 2182, 2524, 2843, 2184, 2525, 2844, 2185, 
        2526, 2845, 2186, 2527, 2846, 2187, 2971, 2305, 2188, 2972, 2528, 
        2847, 2189, 2529, 2848, 2190, 2530, 2849, 2191, 2531, 2850, 2192, 
        2532, 2851, 2193, 2533, 2852, 2194, 2973, 2306, 2195, 2974, 2307, 
        2196}], Line3DBox[{2210, 2315, 2314, 2976, 2209, 2865, 2545, 2208, 
        2864, 2544, 2207, 2863, 2543, 2206, 2862, 2542, 2205, 2861, 2541, 
        2204, 2860, 2540, 2203, 2859, 2539, 2975, 2202, 2858, 2538, 2201, 
        2857, 2537, 2200, 2856, 2536, 2199, 2855, 2535, 2198, 2854, 2534, 
        2197, 2853, 2312, 2311, 2313}]}, 
      {GrayLevel[0.2], 
       Line3DBox[{655, 855, 2546, 656, 869, 684, 2632, 884, 699, 2639, 899, 
        714, 2648, 914, 729, 2658, 1037, 929, 744, 2667, 1038, 937, 752, 1079,
         943, 2748, 758, 1100, 951, 2592, 766, 2673, 959, 781, 2679, 974, 796,
         2687, 989, 811, 2697, 1004, 826, 2708, 1019, 841}], 
       Line3DBox[{657, 856, 2547, 658, 870, 2558, 685, 2633, 885, 700, 2640, 
        900, 715, 2649, 915, 730, 2659, 1039, 930, 745, 2668, 1040, 938, 753, 
        1080, 944, 2749, 759, 1101, 952, 2593, 767, 960, 2600, 782, 2680, 975,
         797, 2688, 990, 812, 2698, 1005, 827, 2709, 1020, 842}], 
       Line3DBox[{659, 857, 2548, 660, 871, 2559, 686, 886, 2568, 701, 2641, 
        901, 716, 2650, 916, 731, 2660, 1041, 1042, 1126, 2741, 1043, 1044, 
        1133, 1081, 1082, 2586, 1139, 1102, 1103, 2594, 768, 961, 2601, 783, 
        976, 2609, 798, 2689, 991, 813, 2699, 1006, 828, 2710, 1021, 843}], 
       Line3DBox[{661, 858, 2549, 662, 872, 2560, 687, 887, 2569, 702, 902, 
        2576, 717, 2651, 917, 732, 2661, 1045, 1046, 1127, 2742, 1047, 1048, 
        1134, 1083, 1084, 2587, 1140, 1104, 1105, 2595, 769, 962, 2602, 784, 
        977, 2610, 799, 992, 2616, 814, 2700, 1007, 829, 2711, 1022, 844}], 
       Line3DBox[{663, 859, 2550, 664, 873, 2561, 688, 888, 2570, 703, 903, 
        2577, 718, 918, 2582, 733, 1049, 2722, 1050, 1128, 2743, 1051, 1052, 
        1135, 1085, 1086, 2588, 1141, 1106, 2735, 1107, 770, 963, 2603, 785, 
        978, 2611, 800, 993, 2617, 815, 1008, 2621, 830, 2712, 1023, 845}], 
       Line3DBox[{665, 860, 2551, 667, 874, 2562, 689, 889, 2571, 704, 904, 
        2578, 719, 919, 2583, 734, 1053, 2724, 1055, 1129, 1056, 2726, 1058, 
        1136, 1087, 2732, 1089, 1142, 1108, 2737, 1110, 771, 964, 2604, 786, 
        979, 2612, 801, 994, 2618, 816, 1009, 2622, 831, 1024, 2624, 846}], 
       Line3DBox[{669, 2626, 862, 670, 2629, 876, 691, 2635, 891, 706, 2643, 
        906, 721, 2653, 921, 736, 1059, 2727, 932, 747, 1060, 2728, 940, 755, 
        1090, 2733, 946, 761, 1111, 2738, 954, 773, 2675, 966, 788, 2682, 981,
         803, 2691, 996, 818, 2702, 1011, 833, 2714, 1026, 848}], 
       Line3DBox[{671, 863, 2552, 672, 2630, 877, 692, 2636, 892, 707, 2644, 
        907, 722, 2654, 922, 737, 1061, 2729, 933, 748, 2669, 1062, 941, 756, 
        1091, 947, 2750, 762, 1112, 2739, 955, 774, 2676, 967, 789, 2683, 982,
         804, 2692, 997, 819, 2703, 1012, 834, 2715, 1027, 849}], 
       Line3DBox[{673, 864, 2553, 674, 878, 2563, 693, 2637, 893, 708, 2645, 
        908, 723, 2655, 923, 738, 2662, 1063, 934, 749, 2670, 1064, 1146, 
        1147, 1148, 1151, 1150, 1092, 1149, 948, 2751, 763, 1113, 956, 2596, 
        775, 2677, 968, 790, 2684, 983, 805, 2693, 998, 820, 2704, 1013, 835, 
        2716, 1028, 850}], 
       Line3DBox[{675, 865, 2554, 676, 879, 2564, 694, 894, 2572, 709, 2646, 
        909, 724, 2656, 924, 739, 2663, 1065, 935, 750, 2671, 1066, 1152, 
        1154, 1155, 1159, 1158, 1093, 1156, 949, 2752, 764, 1114, 957, 2597, 
        776, 969, 2605, 791, 2685, 984, 806, 2694, 999, 821, 2705, 1014, 836, 
        2717, 1029, 851}], 
       Line3DBox[{677, 866, 2555, 678, 880, 2565, 695, 895, 2573, 710, 910, 
        2579, 725, 2657, 925, 740, 2664, 1067, 1068, 1130, 2744, 1069, 1153, 
        1070, 1164, 1137, 1165, 1094, 1157, 1095, 2589, 1143, 1115, 1116, 
        2598, 777, 970, 2606, 792, 985, 2613, 807, 2695, 1000, 822, 2706, 
        1015, 837, 2718, 1030, 852}], 
       Line3DBox[{679, 867, 2556, 680, 881, 2566, 696, 896, 2574, 711, 911, 
        2580, 726, 926, 2584, 741, 2665, 1071, 1072, 1131, 2745, 1073, 1160, 
        1074, 1166, 1138, 1167, 1096, 1161, 1097, 2590, 1144, 1117, 1118, 
        2599, 778, 971, 2607, 793, 986, 2614, 808, 1001, 2619, 823, 2707, 
        1016, 838, 2719, 1031, 853}], 
       Line3DBox[{681, 1033, 1034, 2557, 682, 882, 2567, 697, 897, 2575, 712, 
        912, 2581, 727, 927, 2585, 742, 1075, 2730, 1076, 1132, 2746, 1077, 
        1162, 1169, 1168, 1172, 1170, 1171, 1163, 1098, 2591, 1145, 1119, 
        2740, 1120, 779, 972, 2608, 794, 987, 2615, 809, 1002, 2620, 824, 
        1017, 2623, 839, 2720, 1122, 1123, 1124}], 
       Line3DBox[{840, 1018, 1121, 825, 1003, 2696, 810, 988, 2686, 795, 973, 
        2678, 780, 958, 2672, 765, 950, 2734, 1099, 757, 2747, 942, 1078, 751,
         936, 1036, 2666, 743, 928, 2721, 1035, 728, 913, 2647, 713, 898, 
        2638, 698, 883, 2631, 683, 868, 2627, 654, 854, 1032, 1125}], 
       Line3DBox[{847, 1025, 2713, 832, 1010, 2701, 817, 995, 2690, 802, 980, 
        2681, 787, 965, 2674, 772, 953, 2736, 1109, 760, 945, 2731, 1088, 754,
         939, 2725, 1057, 746, 931, 2723, 1054, 735, 920, 2652, 720, 905, 
        2642, 705, 890, 2634, 690, 875, 2628, 668, 861, 2625, 666}], 
       Line3DBox[{1174, 1397, 2866, 1175, 1411, 2879, 1203, 2758, 1426, 1218, 
        2763, 1441, 1233, 2770, 1456, 1248, 2779, 1471, 1263, 2790, 1486, 
        1278, 2803, 1501, 2922, 1293, 1516, 2935, 1308, 2822, 1531, 1323, 
        2827, 1546, 1338, 2834, 1561, 1353, 2843, 1576, 1368, 2854, 1591, 
        1383}], Line3DBox[{1176, 1398, 2867, 1177, 1412, 2880, 1204, 1427, 
        2891, 1219, 2764, 1442, 1234, 2771, 1457, 1249, 2780, 1472, 1264, 
        2791, 1487, 1279, 2804, 1502, 2923, 1294, 1517, 2936, 1309, 1532, 
        2947, 1324, 2828, 1547, 1339, 2835, 1562, 1354, 2844, 1577, 1369, 
        2855, 1592, 1384}], 
       Line3DBox[{1178, 1399, 2868, 1179, 1413, 2881, 1205, 1428, 2892, 1220, 
        1443, 2901, 1235, 2772, 1458, 1250, 2781, 1473, 1265, 2792, 1488, 
        1280, 2805, 1503, 2924, 1295, 1518, 2937, 1310, 1533, 2948, 1325, 
        1548, 2957, 1340, 2836, 1563, 1355, 2845, 1578, 1370, 2856, 1593, 
        1385}], Line3DBox[{1180, 1400, 2869, 1181, 1414, 2882, 1206, 1429, 
        2893, 1221, 1444, 2902, 1236, 1459, 2909, 1251, 2782, 1474, 1266, 
        2793, 1489, 1281, 2806, 1504, 2925, 1296, 1519, 2938, 1311, 1534, 
        2949, 1326, 1549, 2958, 1341, 1564, 2965, 1356, 2846, 1579, 1371, 
        2857, 1594, 1386}], 
       Line3DBox[{1182, 1401, 2870, 1183, 1415, 2883, 1207, 1430, 2894, 1222, 
        1445, 2903, 1237, 1460, 2910, 1252, 1475, 2915, 1267, 2794, 1490, 
        1282, 2807, 1505, 2926, 1297, 1520, 2939, 1312, 1535, 2950, 1327, 
        1550, 2959, 1342, 1565, 2966, 1357, 1580, 2971, 1372, 2858, 1595, 
        1387}], Line3DBox[{1184, 1402, 2871, 1186, 1416, 2884, 1208, 1431, 
        2895, 1223, 1446, 2904, 1238, 1461, 2911, 1253, 1476, 2916, 1268, 
        1491, 2919, 1283, 2808, 1506, 2927, 1298, 1521, 2940, 1313, 1536, 
        2951, 1328, 1551, 2960, 1343, 1566, 2967, 1358, 1581, 2972, 1373, 
        1596, 2975, 1388}], 
       Line3DBox[{1188, 1404, 2872, 1189, 2756, 1418, 1210, 2760, 1433, 1225, 
        2766, 1448, 1240, 2774, 1463, 1255, 2784, 1478, 1270, 2796, 1493, 
        1285, 2811, 1508, 2928, 1300, 2820, 1523, 1315, 2824, 1538, 1330, 
        2830, 1553, 1345, 2838, 1568, 1360, 2848, 1583, 1375, 2860, 1598, 
        1390}], Line3DBox[{1190, 1405, 2873, 1191, 1419, 2885, 1211, 2761, 
        1434, 1226, 2767, 1449, 1241, 2775, 1464, 1256, 2785, 1479, 1271, 
        2797, 1494, 1286, 2812, 1509, 2929, 1301, 1524, 2941, 1316, 2825, 
        1539, 1331, 2831, 1554, 1346, 2839, 1569, 1361, 2849, 1584, 1376, 
        2861, 1599, 1391}], 
       Line3DBox[{1192, 1406, 2874, 1193, 1420, 2886, 1212, 1435, 2896, 1227, 
        2768, 1450, 1242, 2776, 1465, 1257, 2786, 1480, 1272, 2798, 1495, 
        1287, 2813, 1510, 2930, 1302, 1525, 2942, 1317, 1540, 2952, 1332, 
        2832, 1555, 1347, 2840, 1570, 1362, 2850, 1585, 1377, 2862, 1600, 
        1392}], Line3DBox[{1194, 1407, 2875, 1195, 1421, 2887, 1213, 1436, 
        2897, 1228, 1451, 2905, 1243, 2777, 1466, 1258, 2787, 1481, 1273, 
        2799, 1496, 1288, 2814, 1511, 2931, 1303, 1526, 2943, 1318, 1541, 
        2953, 1333, 1556, 2961, 1348, 2841, 1571, 1363, 2851, 1586, 1378, 
        2863, 1601, 1393}], 
       Line3DBox[{1196, 1408, 2876, 1197, 1422, 2888, 1214, 1437, 2898, 1229, 
        1452, 2906, 1244, 1467, 2912, 1259, 2788, 1482, 1274, 2800, 1497, 
        1289, 2815, 1512, 2932, 1304, 1527, 2944, 1319, 1542, 2954, 1334, 
        1557, 2962, 1349, 1572, 2968, 1364, 2852, 1587, 1379, 2864, 1602, 
        1394}], Line3DBox[{1198, 1409, 2877, 1199, 1423, 2889, 1215, 1438, 
        2899, 1230, 1453, 2907, 1245, 1468, 2913, 1260, 1483, 2917, 1275, 
        2801, 1498, 1290, 2816, 1513, 2933, 1305, 1528, 2945, 1320, 1543, 
        2955, 1335, 1558, 2963, 1350, 1573, 2969, 1365, 1588, 2973, 1380, 
        2865, 1603, 1395}], 
       Line3DBox[{1200, 1605, 2878, 1606, 1201, 1424, 2890, 1216, 1439, 2900, 
        1231, 1454, 2908, 1246, 1469, 2914, 1261, 1484, 2918, 1276, 1499, 
        2920, 1291, 2817, 1514, 2934, 1306, 1529, 2946, 1321, 1544, 2956, 
        1336, 1559, 2964, 1351, 1574, 2970, 1366, 1589, 2974, 1381, 1608, 
        2976, 1609, 1610}], 
       Line3DBox[{1382, 1590, 2853, 1607, 1367, 1575, 2842, 1352, 1560, 2833, 
        1337, 1545, 2826, 1322, 1530, 2821, 1307, 1515, 2818, 1292, 2921, 
        1500, 2802, 1277, 1485, 2789, 1262, 1470, 2778, 1247, 1455, 2769, 
        1232, 1440, 2762, 1217, 1425, 2757, 1202, 1410, 2754, 1173, 2977, 
        1396, 1604, 1611}], 
       Line3DBox[{1389, 1597, 2859, 1374, 1582, 2847, 1359, 1567, 2837, 1344, 
        1552, 2829, 1329, 1537, 2823, 1314, 1522, 2819, 1299, 1507, 2810, 
        2809, 1284, 1492, 2795, 1269, 1477, 2783, 1254, 1462, 2773, 1239, 
        1447, 2765, 1224, 1432, 2759, 1209, 1417, 2755, 1187, 1403, 2753, 
        1185}]}, {}, {}, {}, {}, {}}},
    VertexNormals->CompressedData["
1:eJzsfPk7lf33vYQmESllLkOmKJFQdkqKEk1KhgwVpYSKNCpjUikVGgyJECpD
hoZtnodjdhyOg2M4IxWllL6HT/Vc35738x/UL+dqXa/rdux7vV57reXe9xKH
EzsPcXNxccXO4eKazvm8Ks0v0tpMxBNCVYbpWUykHiZ/kBguBVWDE97G+W2o
2T941InJxGcTMl8OuJTB2bcz0ptut+KqY6p71sqx0Pq7krLfhzLIOPxIYPqe
FvQVf9PjbMXCWDm3uJUXyuFun2SVlmgzBp5acvPxDRYae3WcLZ9ZAZvPHx9J
e9WIn4K7onyKWNjNk/526f0K8CyJbFDZ2ID4qILo94mFJ8cMl3qrVYLA0NCy
RXUEZF3pNH8gx8ay10OjmkWVwDs8s/ihUy0eWuoq4rmTjSPkrP5w6yooiLkz
YspXhdrclXtfnWdj1IR9W8nnKhA48YMycaYMWWp656Ifs9H9tbqYwp1qYOx6
HZdHL8K1a628MwrY+D6Sm99FvQZy/f3p7qmIQUmptMVkNgaiQk5QTQ3kz/Qx
/kbOxsj6O1xlw2xMu99xKtepFlKy/Lq+nnyO3+7TkxS/sbFvgwFRk6sOzIOo
WYUXO1Aq4xNx9iADk3veKYv+qIDQc0simetJmJVDL7y/nIklEVvq86MrIfWi
od73ISLOJJ9KGPRgYl2nZFS9YRXMqPvWq/2oDed1lss1ZjDxeYx8iye9Cgaf
L9l4XrQVRQ/HG8z8wkRN+wX1Wk+q4ZLT1Zp195tx49M7Rce0WTicSP5G31ED
ugIpBxZ/aESVsW3ExV4sDBzg2rCZrxaWePPuD9ZuwM5aw69z0llYt+TWvJdl
tbAi41u29UkCblkf50QfYGEUee6BFxfqoFx2BdGpthovPX3H81aKjWo/KpS3
ShJA/FzXkjOCFTgs2HmRbwsbl913pZ7zIgDOK5E/GlqMMi1nje3c2FhvkWp2
gEQAefG72XT1fHyzUy1+7AYbhYvJD3zV6sHhaNEqu/5XGK2qb/Qkjo0XnGmM
eTfqwexhlNChsSRUkxoPP5rKxjvFmis/0evBdn2kslFzF6b0zshkvaFjS9d5
K+POGtjs45HxMIiMpREd6klzGciVaX9K7k0ttE3z/Vou24ka9sdGy+0YGG1q
nWN9tQ66tKr6Cm+TsJ86p2l7DgdXyfUqWEGAnSkv7ttw7kuvzOtTZXOYaGDV
6yIfTwBrk+PdQmvb8Pi0W0wRayYuCVW4fnZ+PRwfWdigv6kFbWSp6/A5E4Xd
SkuO3qyHsycId/n3NKHcswFhKud++TRE7h7laoD6xAPzSJsakK5B7ncBFm47
Zp3Pf7IB1uwJEF3CTcDjGXrbDH1YmBW0gjRnqAEEHkkkflxVhfPUkp125LKw
Q3s4ev/RRrA/vktKZl4p8nRywxs6C8PVCunN7Y2QMHt5/wxWPor4Wcpm8LNR
nq0gpmDWBMwbyh1yfq/wwsWN9iHybPS/fCvX91UTDB063uR+KgG/cp0cPaPK
xqOfigIMZJohJLb9g6VaD6ZrS9542z6IYbQx67bD9cB8UcMte7gbKV1fz08z
pyFpPEF43cd6iAtqkciLpeDziXsro/JoyLIFlcfnGmBdl+R3k6ddKD8+crBf
ho5jXudvaAg2woewVoujJZ14f8zYw/QGHcPcpcI/ZjdCT5DERp4mElpsPbx7
zxgdz1yIvB6+rQkMrhO+VIcS8cWuDRWRhxnYlPSjbmikCRwzDlVIHmnFPUTd
8z7FDExiJesqXG2GQudOb9GGJqz5EXB5jRwTKaOmfEL6LRC08ttQ8toGDFjA
e/HjaSaOL7rve5nSApdlV5YzH9biGkU1kQ0lTGStGs9459UKXPruVy+6luM3
m0ij1dNZuEdivCRUpA0UqKKWJOlCrJVQ3rR6JQuDs3MeuEe2gUeFkH7tYBaO
7ZRgdhuz8OPtBbv9VxKhQfe5odbOWHQ7Zxjsv52F7/LXX0x9QIRzpZdksj9Q
8bmIyHyRoT5093FrOebUBILKWhNpelQ8Vmla8t25H+18TPJ2ajbDzuc2SY5H
etGg+4CI7VA/6rYqVI5Pb4FL9gqP7/j0oF2YiOEi7wHcaHpjGk9nC8AKn0uF
F7uR+UWFIck7iGnnN5+vetcK6dnJ1vXOFGzo+kFYEjyIjwXX9F3LaAOJrQWH
+46QUfxokrndQhpGya8d2BxKhLdGSvK0AhJ+yhrRdQqnof11WfKOW+2wwP1Q
3oySNjQq3/Hl/GI68rQxHtQHkGBLVo5veHwzHvPPns9/jY6CuuKLrnt0QMQV
0/p3CxtQt8V8NHuEjhte9vJ42HTCC9+ab5aN1ehs6+FubcTAjOKVpDtaZFhG
cHKMCi9GW78badV+DHRsTqKd+EGGZNnQzztys/GOMF+QXTwDC8KX6wqmdQHj
h7vvBtJdfNQlmM39iIFr5t7YL65IgejenXqFOoM4o3jDNl/Zbqz+EZrW/KEV
Em4vu7oxYgAtNUuvtkR1c86fZ1W2c4hgEfKNVlHaj6pnRreUGfbg47P+vGUr
2oExIzfFk9aH3UPvGMatPbjmyKrQ5PMkmOEZYsLNpKJq45WJaLdevCM3pBpJ
7oCYt4vS11f04tWQgbP3Ban4MJKv9fseMtzbcf/Aae8e1BHypYaVUFE4K/nQ
lowuuPLxkdkwbzceCJl3vGh/H25Jy5roSKWADPWsvVgYGRP2PgugzezHwech
RjKnu+FWWCZvWEM7Wp1rDV8R349hc+O6Glf1AF3zis7dYy14irA1+L7OADqY
fbbIf98DI/km7+IL6zFv9L65RtoAXrv5lnfGg15wybx04FN3OcIenziHGYOo
n2jSdkyDCqUjyU8Ch15jVVTMrjcrB3G+7UXuwAQq+J/5IrLgZBB+Em9+sUVo
EPsZraEfF/TBps0KK/wMGWgqQR0QC2nEYMvud7NXkcD29Ec5vQI6SldtIFVt
aEKxj4Td0SkdYLWvOqVPmo6fkyVE1y9oxhgFnRAzKzLISTNO6DnScNioZlqD
aAtOxGY/DphDATW9vMRWn0G0PCE6q12wFZckktR1+LuBu/Cz/6j7AHaLr/u+
VqwN8+zDBIXleuD8rI2sW6r9mD64X85Gi4jvrn41ktzVCyZOrLCeJ1QMUunk
P2DTjuaPWWVPw6kwVD1Sofq+Bx2a5yW8iibhrq12AjPK+2BVf90do2cU3HV/
pTc/qQNflu9sK145AEKqL6SW7u7A/Vb5BgcXkzHvg2SqnesglM41O2k7twUf
CHru0hHsQocULJl4RQMumYk0p/FazHr6wudJTBe+5JpVsjKHDtzbD9h8DcvH
Y1uP8rs1cXDeC+K2JxnQlnFHIOPUabTqz+5cQ+zCs31nj10pYEBp6Z2dh6OY
yPV//3wGXrnYyT7ugK1ymWft1P/BLWPXsuW2k6HN+BN94zPGb3zByStzbeZT
oPvEvMWWvP/gFE/H+AC5buA5tffSPj36b1y/PGhOza4ekH6tc3VsO+03vrpx
S7LS3V44dlNILJfDg1+4wnsCv8XCPoh2P/q062n/b/xbgWX9/sh+MF1N+ljb
RP2ND5nfeu5vMgiyJ0/nl6X0/Ma/fEudvfUbDQQ+Jvns4fz+v/DsXDv7B5w6
sPku3Nf3J/7Gz256dC9gHwtItB8dBd71v/GQOPPZL8rZsN7e86zBw4Lf+EGe
AsXF6UPw6////+fwn3yG/+Az/OKzNRdris8KKoYLOXwGxqIDU3xemSf3atpR
Gh5abKk5l9kMr+eszKgVpIDvp6ati4IG8XuL1J6B7hYwCJamGQp1g/HdvVN8
5vZcMm2dWBt8dBed4vOFesYUn+dyG8lw+AyHYq9vnuSzKG33A6eHVLygsi1T
4nY7rFQK19e4SYVVc+89L/zSg/ouBeQiZxIIdFw43F/fBwPaF+9O8nk38/Yp
Dp+hZe8m4v/gM/zis66Bw6lJPpszrm3n8BlGObJ4ks+r1oS/mOTzNp0n5zh8
hs2EI6X/g8/wi8/3TlCdflw5jS8852oejuiC9tcJ16c1MeCDF0ydz8eYByfP
Z/hafWHqfI6crTF8OHQAT/At1jRN6YY2Ju0a33QiODF62qfX9WMLO3+FmHYP
KIXtjVmr2w4X3Cq6Znzow4PD30YOVPSArcB4yZFAEpwl5qfK91LRxuFqxrOL
vdDDW1Ju29ABz8LrHyvn92Ji+caH1ZJUWJRUHSK4hQxrJONy4q/04JsHOtut
sqmgpSNQxV/UBeOec2sSP1IwV6IoboVXH8RMrBEceUCB2z8klGwuk/HBRcuL
AqL9QPc5uOvH0X+dz/Af5zP8Op+vbJIlSdbVY5Rm3q3jMQOgN55aXpnYC2nO
rszrfBX4WSHiJo0xAKuK8+xkzKlgdof1pGnxG/ymeuCz7MJBONrTNF5VQoVr
7k5rHeyCkG8wZJm99CC0xgRta+TtA/tlVlN6Y/F+mNQbQGzaNqU37N5vntIb
e9XWTOoN8FSzndIbHyV2T+kN8XtHJ/UGKH0T/196A/5Db8AvvfHh4Nk9O+wp
6BKuzfX11iAsnSAlGCS2gTBNcUpv8OqOTeoNuDzvTf+k3pAW36j1PIOE0sLc
/uVRNHBdazo707cdBCSJclHZHN/60bvlngwdguv8iDQvEsiJ5fhN6o0Jf6VJ
vQHSpKOL/4fegP/QG/BLb7QYiJQ6BBejewjLjecaAy7XMS74MchwqqppbFJv
pPj7B3L0BlRKd+lN6g2bBVeJt6rvYuzHge02cQyorxx3BkkKVNdS77ko9mC1
8TxVIcogfEh2WahiXw/T2Den9PPD6BUXOPoZhAydpvTzkICTYuZTCmqxNtnc
yKJBdpiAn9GVBnAgFyVpZnQhSy/F56s4HQZiX7XaLmyELD4jjaTcTtw87fOJ
WWEc/LCbv/KLf+ln+KWfn12AmtecczJHSdqVdpQB/l+uOXYymoC1PuGl+cVW
JBTWZeq9YcD9jDbfhIfNsET7VKdheRPqmD9fK67IBJN5Q+m3V/1LP8N/6Gf4
D/0Mv/TzpdGc4xlKhbg0ZymFW40Fo4/CvtUktEH+yYuSMR1Z+GVtr81MUxYk
lEXV+8oSoTG58vxs61j8sKA0dcdWFqjIaszUTib+6Qfhlx+8W+k9OOsSGQty
ti2ZI8SAW5fML19Or4X1eTJTflB2xY1JPwjRw++z/4cfhF9+MJsvcsoPtrYV
TvpBmKvWNOUHf5ypzB82bMNF6fIb9C2ZYJyz5kne4npIOzPjfsVajh88tE/a
OZ0J36eV+2BQPRwgf5nygyEZ7ZN+EFKuvJvyg6YuVeZmpg0onX3CTWgdC4Kd
3dzCzjZA652s7N6ZBJSad/L6vIss8OrVxdmfG2DLeLlpA1Rh6/NAxvpsFgw+
HHZo9GiEGVVrBmeKleJyo6C51YMsUFzyrS6/919+EH75QauvuYmlN15hjdc2
wXeybNBOu3hta34TxOl0TvlBp412k34QPqosD5z0g3/kG/Ar37DHyxGT+cb+
m2JF95czQed6CmEy3yiuL3QP/0zERcpPBdPdmCAXkZlXt60KAg4ErpFN4dSN
dv9I+HMmlNV8uOAwXgU+V1+lb5jXirf8hBT4xpnQQq94Cw+qoeZF/VS+sUH2
8mS+AQYl679P5hsnw69O5RvC4haT+Qac46sxmMw3tEfSj25c2YBBZrzfX2aw
oEHhEmvB21rIvy+VrO1NwD2bxSQP9LPAzOJmYV9QHXxuEpnKN1x3F07mG3Am
J28q31gplnmQvqgCB84WSbw0YoO6SkvPiwv/yjfgV77hUTc3au/qfLzpeci3
+jobujZQbu3R+le+Ab/yDWKCaMRjVhKW6z9/H5TGBsUO7/KrvfXwyuzgxWN1
RPxklGh1LJsJjHO+YUfppdBooToUVdqGnxIux7yjMyE/33+lrfu/8jr4lde9
bxITnMzrxBc8mszrwPDFl6m87lzxcwNxyWbsjdyvtfo6p55JpSvKBSvAdGPj
D6s3jSg45rFPuZAF4+3Musux/8rr4Fdep9QWTdZuIqAsDlu5cfjDyxt61Kaq
EtDbZSqvWzXqMJnXwZdrAgP/I6+DX3ldJdk6FNzL0GbJkMg1Tn0evRyxzA6u
Bu+K6qm8js5tOZnXwWF1iam8LtzJOuf0Y8Tt5Ke+/WQ2GLI9PmgU1QD1pud6
/5ZsVJUzuhL8ng3Hq7jgvXUtfO+zvBzu/ByFegWKBr5x6vxO5PD4SC04hi7+
rnOpHT+tHrBVPMPEhBSi9qKEcphH3NUWIkrC+UFchu/3MnHXe+kcZ/tyuLRu
of74vAwUmX9ru2czGx/dGPQ56c7hg1jL1k5qCo5ErnvwkshGqsdDzeqHBIDS
bkn5CBoW5wh1h38l4fheP/vsne3wIWGvwgx+Ji7I7du06Xkx6sHy27F8nbDn
fJ+vURcNQ23iuIPDSHinwt1+6VMi8LreHlhNG8TpK5pH9/F2ovMW9KWWkmDz
ncPx+tcZeGc76eN9/xI8rEx9np5DhmemTdGfOD7NUH4RzhIlY1W/xakFsp0w
VtZoaDLE8ef9UeqZF0vRJ64kSd+CAm2OPj62RgMYOVttF/+WLszLo3ENNpFh
12sXNmMZHdf3ze5iRZfhPle7XXme3fBYdK76Jp1+LD3Bd/eSJQV7F2Yb866m
gHO/+dwxMxquk00si15YgeW9ZZZZ13pA8PI1VuvcPoyosVGuHaDghbiqimOq
3XDlXuujK9ocPzk2IPH+QCUqzv+BVGIvfOr2tSM+68Un3lxXjSO6cUxjR/21
RT2QKirWZd7Vj0KGIu92FVRhqJPG8IBRHwQ9M5C+NK8HH5gUb3be2oO7eRM7
9s/thdwLgRNl2n142265rZ9WDRY/a9xoT+gH0YJts1ZMo+Arr2Ub64d6MHkk
+StJlwpMiVF/f81e/GalqKEoW4vm49JNpp6DMOetaaFDAglVeOM3k+724rb+
ja/Xa/RB5vRsmVUZFOT2SBbtEiLgxIt9mjYL6fDEd1bdY88WpDtwfcpdQcXe
G0rJH2X7gXh/2+FjnOtE3em6dvA7AYMXKGhl3mFAR5/tDj2lelwxLaLoUxQV
vweQ5gTT+8Hg/fYcnZdNWOSjOv2gej1WXyK2HZjFAuba984+iiUo5vPCYHsX
FW/ciYoVSBmAtOHsgnGlSgyRfuq7070ez4iKKo0uYMOi4PxFgpYvcPoHHedj
nPWHvqxu36UyCEWXZ+rGlL5Ekp6tRkxpPW6UFooRTWKDgKvZFD9LO8uMOPwE
yhu5KX4u4lGyaNnMxIOZvCxHsWIUi7uW9UqrAxKzSHVPQxlI28bHradUAp9O
Ebb7vCHDEY+vU3xTi01S4fANDEU7p/imN7GJSJClY67lt3XLZpZD/qBC8LeT
3TAUoz/Pfjdnvzi9WqubWA67D54OGb7RAwmvu2dsWDuIb6d53TKgV0BJoLpA
RWfvn3yAX3zo/Dg6dd9N1tvs4tx3WORuYjh53wtvh25Zqt6LEl8S3QkvayHv
Qe9c9xODkN/S5dGVSkHdjQx5MxsCEGZu+jpbgA72IaNUmRckVKi58WEklQB1
6jHnHKIYQFvC7Wyb1IRyKo6iflfqgZF3+pTlBBMwL3AkSLoSjwvs01hXVg9v
dnodfz+L/dtXllJ8qx7X16O29RHTBW/Y4NETPVX/xxZbVTj1B1udhbGT9c/u
e3yR9xYNl+ia7TstzvEnrzubHLe2Q1WA4lT91TznT9YfJBX+r/4d2TwHY7oH
cdHR8cjDyzohd2y7v+s70p/nAPw6BzLj+VYd0hrAOxtPrdgW2gVnWiR6Xd6R
gao7sktxQz/GlrmuHzKiwJaZ/j0+azmf0eqaD3n6UMVpVUTfVwqIuOTlUeW6
/9yn8GufDlqcC+US60FBlkecH8eXPfBStbYX7YVprbFHrDu7MMqiJ3jFol6Y
E+Kzz0uWCoS9ejPm3SXhQ++qNKPkXhjfoCr6Ra7vz30Ev/bRXkdlKDSox2PS
etfVTlMhzbwx2WTOAETYMCu3rSnBsr7RcPVKKnwNHQt+/Xbgd/1/5gHwKwf4
Y1/Ar33RnrajVrWfhjlJHrwrT5LA64lkxpdUIvivuvuhufQK5vfW3L7bRAUe
s7bSDSaDkLL50ub1Ae2Yad+0UMWTCYo/WufHppQD63WG24V5JKSrn9o0xtGH
C+OUtASs/tVH4FcfURgMShBKzMAtG13auj+zYUlEckVaZi1MH7sWrrCDiO9n
lO+3IDBx75vQbEWlMnh4yGOcNzYD7z24svLxGBsZ4V/0U5NqYcV9rcdxAgx0
SJpJSG5qxLZyYlVXIwn273M1pZ+k43TpGU/aOPwlH+R+zHWpE+jtfu9OF9NQ
arr04yX+zahSvTzqm0EXyMao0WeNDKLw5TVWzzxaUOEJr/jMCArk8vikXPsx
gHkC+SfqOLrDJuaV1pq73RB928u0tKUfh5S5Unri2zCIX2UH5vTA0nHzeIJ7
H0aueWEtWc7xH+HrpPs/9IJef5/IwuJePBvtKSk10o6Niq/9c9f3wffU9g13
67px3m6xl082d6DTYJzcbt9+aFyww7yeSMaEPs/8QudOzOcdkufuGgDxrawP
m04QOT63nzHjLhkXCq7jeypEA7F3YQ5H5jbiOb4jLm5SXdgbfVVTw4TjF/V1
ZqZFlmFC8YbV56u6cM9LRf/Nsow/7y/+ur/jm/i2lvK8wEvNSetLeSjo9Wbd
R5VYBjyxzLrq5vZPzraymmQ8f28nFCYfcZT4+E+eph0hGb5FuQtaxYU/Htjz
Dx6r5LWqOI4CCz0PtjrF/5OzOdU811+T0w0bLK/IyRP+ydn2XgpPiaL1wF13
Hb+a9H9ytgOqOxvf7aPC+8zEN7yuA7/xE2V7YhKr+uCNlN2y8cq+3/j6eU6i
T10H4Bz3gaE3hb2/cbXk7XQPFRqMJHp9krHt/o2Htu6Q9qLQoSnHurktteM3
LsXIafR6wISIBd1S6ueaf+PDBzYalMqxwTyM8CbgTOVvPK9l8+jg9iFouuqr
wX05/Tdef2jDxdv0IYjlT5u9QYSBq5W5d+elNoLD+edKT4n/4i384q18w07h
/rc0ZFzMHmA9b4YEV4+5M3S7wDru000uFqc+Hj1PwqNbILKuRmt/GAVq3cRT
J3kbfOyjC4e3IOKjuHqStyrO5KPVtf3o1c13cGFrG7zKdgjSSu+BwPxQ8TNH
+nBgtnD8s3Ei9M5LfrCU0Quh9w8K+7/uxeMxYttmK5M4/avtmq/2v3gLv3g7
71y8uVsFGTc8/apR+5ij8yI/le5pGIBpT/SPjV0gYt6R1SunW5Jh6dErh2Vl
aDAn4GNezLRG3Fd4YrWxdReIr69+OKRDB1Ghcb5J3j5m2+pxeAtJDXm+k7z9
g5/wi59/nBvw69z4/EFw26RejaatmdSrUJ/5dkqvpi7mY0rJtGPb7oZs3vtM
dHiqtaKnuAySU3hUyXte4oK7yg806Gz0tbkyMUitg1qfVxaGxzh6II54f6lJ
Ji7bJqpg/6kD2m1GNdbZPEaLdUU1+yML0OLR8B1KyhD4St0t3mr5GL02dU/f
ZlkILxcwvecnDMGPeHmRuBwGSp1clJixidOXB5muikodv8/tn3kt/Mpp//ie
8Ot7hjeYS++2fomz7q56e4DGhrU9cl+rhuvgcjJPO+FEO05cNJYevcpEu0vG
kasjy6Bfm3lu/lsGTnyZOOrysQbXKDiSkpf/83MfdOeL9YgXIeX0smcaT4ZA
ypy6N2l2LMp2BriIaREx4qWmZc9BFmyX2xWr0hKLr8Xt0mZ71WPpyO2TA0Vs
KFVumJ18lIkfTdK3Cn7LhK1D5+fhSMef14Ff13m0edDsWPBLbE0aP9z3hY3P
z/len9NfC49VLI/eiiKikHGZxK18ji9uV1ihKFAGmjl+6h4aabhRcqmyEZMN
Ch0BEel8hD/X46/1qR9ip9ZrTUhPrkf9A/em1kfue1j9KZiJ9O+3A+UeZ+IZ
pv2ylDMdoGlye49ICRlX1zmeQT8CHj5nsrCdQIf3xhdgth8Fm2LcJGKmFWDt
7AzupPkM4HKpijSuI+MJBxMtTW0CNKTcDEYiHfQyc6bWO32VFeSsB/OTItMn
1zsdabn1MZjy+xyg1rDrXA4yoGWXUFaQaRsOv/iSYi1Zj4nmtintFkx4pvjK
/uGbdty3NsbjunUBdl33oJ5HJphGrn9hbdGGFatVqhurCLDjlTu3gv2/1sOv
9aE1sxxPfWv//XMHr6TsX8rDghF3/Vs1tQTckZUd3+9fj/yHXGKuPWDBGZXn
/HG7GnEpjxWL4lOAvC0XdStXsP9cD7/WU3IZzZlmjdgXkZ/XpV0IKfPOOCUo
s0Ep5Nb0G1caf//cYzXjRSJn2TD/5JGVQgkF2JHGqyOUUI/JqhryQ25sMNXd
0qscXopb7LPSg4QL0UdTL4JXdQj6I79Prf+/z3rY+mqlwuT6CzXUnsn1TcTx
As56YHKnh0+un2dQq0wSKf39c5+Wdnuq+Q9Bw2Z9kR3Bj3/j/kd+hMV8HYJX
HsvmrGhiYPD7q028y2vB6nFM4P5CEvBFT8sP9mzHCL810QuDmCDMlxmrHV0G
YlYrkssvvMQX4c5VB8fZ4CO2v7WsrhaOnygNH+hgYPFo1PTI4BoUL1C+yF9F
AsLSAD3/ECbqjCk8U/yYAUp8n+7pnO0AmdD+zZTaWGztD15Dqa2HlsawsJ3Z
bDilvEj4TEkn0ufbbrSn5+P63PNPT3AzYc/nJKFJPD1NZgcHh/g5C6Zw2fnS
TQMzyf/8HSr6XEG3ARPWC8hG+iq2onCdtP4hQgG+/PrVaPsl1p84/MIPpIYe
yhVu/X2d+ZurDooTWZCRwJP4ybMWPesMV0FzAbYYe+abFbLBytthX5BbLc72
t9577WYhHDTku1r/mg3uIwXdJUW1v68z8mjuxw5Bznki5O+o3p+L5EOZXDL+
BXgr4fgjr6Ah8J7OH5BCyUW+lad91xkWQm6RSmvB5SHwNGkvXi6f9/s6+/ud
lJSb//vvVn/xv/hf/C/+F/+L/8X/4n/xv/hf/C/+F/+L/8X/4n/xv/hf/C/+
F/+L/8X/jTvNFSM2O5NwcDT/6CJ5Jp7RUA9su1YJ6aFf+4+RW3Exr8nwjYUs
fK1jTB8llAH/go2zrxu2o72ufcOQPRPN2u986RWvguQVDi8uVregmvJybvHN
LPyQwHvjinE5fNoa7R4vQURNoy8hzAdM3Jo263JpShXUalbdPvKqGeNmz9rj
epqFMe1W47uLykG4Z8dQR3srUsN6m+e0MvGkSZH9+83VoK05KGER1oTPTl9R
Yj1moZWswfhzqIDidvWL74Na8Hb/s1lf57FQ0esoX19fNYgYvLcT3t+IM1YZ
5CYTWDjzewl/GFbAlTdSFeErmvFLpB2Dwvmeh+6QPly7VAOJeorqtSINmBO4
P8PvGwuPjXyda2RQCYI/57WHfs5rV/yc154TpKU37TXn+rdSD9deZHHqNzOi
Wuq/546jxLY9yautRfoN1REeUzYekDpol2ZcBZFeEZYiKQTkCY2RCOpmocpo
QNB2pzrw1n50dElXFfYtihl86cHGrZLrhr3rqyC0cJWoUXMN3uJ62d0oxMai
uCqKGB8BbrGr74TXlqP3ZzXzZXfZGEJfsHvV/mpYVs+9v8qrEpst1qXa6rCR
56ShsIQFAWQWl1kdSy/B5B6DxpF0Nq6Y6GYE9lQDf/BFmV5CKRp0bYs/bcNG
ou0lL6lkAuzhna5Z61iIMz71Ou6sYWMx11BInEsN8ESO02nMQhR1ehQ4cp6N
5+8oRCmPE+DayaVfruS9RbUjMzvO9rLx4bEEqZKRGugTtn52jvsdOhukBqpy
vqctbXbCN6N6KJG87RRf9wrJ6yQ+ffjAxpqS3uKjZ2oh7vCcidCkLNw0wPD1
j2ejI8HVUuB+PXxK7Fl4Ip2MsiY/AsumM/BAsAl3QEwtHEqTfH78QifyxCU5
OW9jIC1Fcae/RR1omIawy5U68IkAeUIigoHSRfe8w2cSIHSPSmFBQTvm6d0W
Lu5hoNQ2hV12LgRYu6+LWrKNiO9k9KsfKDPxceK37A+1BND03SU78a4VBx+Z
7813Z+Isxs1VDI16qKcYr702owVlSSPxJ3KZqNEUqUl+9N/z0Uqio9wCQQ1o
XPD00yptFhryLJ+18FADLCh4u+VBGAETA6Qc+dxZeJ5W9DKZ0ABVM3juOE6v
wXOB0V5G8SzUfSbz6PvaRhCf5SZsF1eO7cp9m+MbWSh1wXN5UlwjrM+O8vgq
W4xz27M0xsdYuO8rfYXnjCaotEl8OJ8PcfS2cr+1CBt5Wf6PvhxpAkfuipkX
xLOwuXPXi/XLOPf9zAwbs+ImCNdKbLG71I3iL2LWJhrQcHvRhbDB7nqYm/nh
jGIjBRn2MqJeMTT8tuhoBNWyARR44nktl1DwkWk/Zc04DaWD0o33tzXA5ae+
389lk1HqZDn37X10DEqoTjY+2Ag9Sy6cps3pxOqOK0Vc2XQMtbnodXC4EUA8
YFDbkIQ5etuk+0UYWF7g2uLq1QQNlTF6Ozj35dUFNTmSBwPPCi+V75jRDAf/
Yz5aruPBSKB8M/YtkznNtZiJrQsdDWYrtoASRV6yvacBN0xb5VvkwETeDudQ
ak4LuEkJtQ06E3Dn8Qv3vJOYmCfVuyJqfStk9IUL9wVW4YEL1k8C+5m4r+Gr
4pzyVsj/ILwuVbgUw6w0/JM552S2QJnk2i1t4NW91nuDRT42tl7HeB0W6keT
9jgUtIHDkrm3Hhpk4r4Me4E7W1nIMxYYkQ9E2J66eLhuJxU/2ZpW8e3vR++9
tiZjYs2wtqWzxDuqF4ff5wXZ1vbjykCXI3GEZtB45BwQ2daDxukB6buNBpDl
s1j8fEgLlDeyyvy4elDMvvmhTv4A9rIOMLjMWuGHsbzUAdFufJKxed6KNYO4
ZUSdXijeBp8mrALuSFBwYpVIpFnaILLkVraQGG2wo0iV2bSAjCJWbbzGy2iY
n11oqPWSCO/+Yz66W6t/S5g8EdXeBitrzKaj6q59DxSOkODmi/Y3H1xbsO3V
9lEXNzq6XrF19NHpgAeLr9Xvdm3EsVlWSZQ6Ojbs6ne2m9kJa42PZAhtICD/
eU/TJzIMVFNdWsOo7gSxDVuNzfIrsDIrlr3PnoGpV75u3eBPBu1b06q+Hy1E
n0KjEPFQBs7cQONNUesCyZtSF296ZGHq8BjRIoGBftYmhMfFXSB9zuxifsoA
rmtN3xJ/sxtXneBLjxpsg1mzFw8zxvvxx35NpT7xHtxZkm1tPEgETacte0+s
68d46TfNSrE96LolbvbBaSSw57EZ/OjSh3sm1PTmyPfipou1/nrqHeA2cVdw
uw8VA2bOvuuX2ovfax2cNh/vBPlP8ppBnr0YY9Dy7oA+FTszP03AczLMj3A5
WLO1B/dfuXVKikjFH0/0QjJpXeD7cz7a7ud8tPHP+eiGufNN2NO7UCPC3dN2
pA95wg99UbfphiAN0S+RJSRssX5t7eXTj6eervwxg68HMk9Pv09e2Ia3RI5Y
1PEOoFJhZHJSag/kBKctdhNvQnGxYZr1mQEkPkhMFDDpBU16mB/vzTpUDLvm
QWsaQEcdduCKtl5oeePz7bBKKTad5l1ntnAQx2QOKEvsooKtitnlNy05KL05
2uHDikF0Kcn6sD6bCh8F5XeWN9FRl+80+ciyJnztYOwd79kBgyZLutRM6Jhx
+9Cd4q4mHLPnSzrD6oT1y7TfHkyh4ZeKxQ+nJTfjtiIpuRCvrv+cX24Oz17k
oNCLl0W8qT6nSajp1fvuXUIfzKdZGRzX70Ytvu7iH7c7sOcd75wuUj8km+w0
b9IhY83Ft7t33uvEwos79n6fPgj307ryJp+rVCG8G5l8rvLTvkKhyecqFzh/
GW6B3889cvlc3Sl0bx4ZljyOq/Sq+/18I9fok76ShsQuWN188lG4wT+4UDWZ
f1Ex5c+5YK5fc8FmskmaqvN/P6/IlXqSrX9RZBBSQk6Pda7p/ec62feC992l
wSYzqebVLXT8tpDcmC7ZBA92icZLnemAG6dXTtWzbMWXME49gV918VQ95Y+X
RUsl0fBKt1qhNDbDtHh++6STXbDo5/zsxZ/zsxo/52e3KH/LiFHuxSD4GvfS
kgQScyaOVzzrgxl66VP13CcTWsipJ9BoF6bq2ULm0Ty3nIyKOzycawo6oVx1
wfwTXweAOn/9qsnn/Y63TtOffN5vh7aY++Tzfql3ReP64gfQoZuf4f6gG3oc
aJ/2drdNzgF95eMawBz+xjqmSA/MJYvOVGcR4eQ0IVXKpn6UP/B+vkVYDzS8
chBJnEPi9OUPxiOcfZepvExBX74XuumW3C/UOsB04uvEfi/O/hEM3hr9uhek
y7foO9t1QmxZRWu/ey9W9eoSLDdRIX66Z1toIhm8313ofbqjB9nkvHMWBCoM
mNWPrvz433Ovl9aOOZQMkfHcXt1cA55+iHwZt4F/ZzdcYqeLinDOQwn3dTOH
fPvB4XSinPv0f+07+LXvLMLpUdFLmvCwiisccR+Ae11NaVTzXogUfdRukVKH
gUki1V8KBsCdyhgfYvSCnTL746ptpVip2ifQwqkvTbh7i6E7Fdqb94R4j+dg
wrTDcSFigzDcnL/pIef3YB2Wn+oj4Xkw2UdAY+zoVB+54U2a6iOzst9O9hFQ
dXee6iNvxg5O9ZFn8cGTfQRCbBf8rz4Cv/pIONukKkKkGz+6la9W1xuEsI2m
uXdE20B72pABcyEFFX1l3shnDkLe1jTnvb1toOLE1btAhIy3Jnqk1yrSwEO7
LTjoORFk/mPu1e9R+HGBRUQMnrv+zG4hOmyMbcXD+0mQe/Bh9nWXFjR+ed9Q
wYMOZRfGJHK1OmBzK2Oqj4zwL5vsI1AQc+jI/+gj8KuPBF/itj7wugI1v51J
y3JkQFbz4WP1F8jw6YmfNr99IVqWrtuef4cBS2tJrhnSXVAetyVyEaePXB3W
8ZF5yoDF65yf0Aq6wKy5YkHMxW58qBXpvn0DDdLMa6jqHF2UnCAYFd1KwVkC
onufPKSBDM+YEMm2Acbes8XNl1FwdZrnA/hEA/PQsPe7uhog/hiLmcTRRQ9D
FIVC99FhZ/t5rzkcXaQn8CXSn6cTM/1vWjBz6dD+sWjZJUYj3Pz8dNl5AxLO
GJ6bxL2QAalqVx6vON0EAntPsdduIqLptfLya6cZ8I1X9+BO7mZg/5x7bfg5
9/rg59zrc9j4Jla6GXfOF1jkKs6Eaa4WXPuWtMBqobu6dhSOf/l4OzDTkQnj
WU8y9F/9SxfBf+gi+KWLhpU/L7daWIo2ji+yPRaw4Onzs656pm2QmqR8dKl1
PuLeFYcE1rCAfYJxh1nWBtsdHGfd0s7E4M4PS4ZMWZDLd5xtpkUE4oG5r4SS
yegX18Kdz8cAE+sT58UiauF2pE7E9HOdGE9y/6BnyoATqRtIC3fXgaKi05TO
TztFn9T54P30ypTOHw+TntL5Qsr3JnU+zM+XmtL5DJlDON+ciK56wXV+Sky4
acwzYlRPgLCPZiq3i1rxg/3gzT1uTCAEBNV/1qoHbZ5NUku5WvCif8DG/NdM
WPvNZjtfxH/PvZ5cYsx3+0YDqlWxGUu0WHA+s2tlsksDOCUVMoPvE/Ce3PzQ
ClcWrPXN1gnh6GR71YeGPYI12Ks9I00pjgWSZldfGW9qhHBZH69NaeXYhwry
CfUsmJvNt886pRFK33WpqysXI1XEyL7iMwt27xBcxT+3CWYuWpadNxPxkmFS
58B8NhyRY2UfPdYEh5coHa+Sy8Jza/bTU+TZcGpj0AS5ugmUPW60TeYAbt/p
kzkAeBMSAiZzgHWUoMPrTNrx2nJXnY12TMivz17WtaQKIopSCbWKRGw4ZnTa
NYIJGzvPqu3JqwJl59dNReRW3LToePb3ZiZcveFa8m1rNSxfa119xK8FDx2S
FtAUZkG5L5eXEaUa5vtum/Lj3ed3T/pxsHJb9HHSj1tpLC3VyWvEhbrpRryX
WNBcsWT/Ocn/nnvdLTtOdn5BQCmFvaO2FBZMj139puREHQR97ozWbqvBw/uW
zzstxIYmfo883xkESO7fL/jiQiWebn/DE7CGDaIiQYHjlgRwlLidG91cirt/
bNpcZ82G8/Q95/RSCdB3uMVhx1AhbmimP7p8ng1nYoNkc74T4I5liukS/ndI
U7Y/ZHqHDZZa1i7i2+phq0XxKDUxCy0Of7icFM+G0ym+vTKR9eB5Il99O60N
jzx7/H4VlQk7qM5gc6AMtN0t7vFQWrFDdtq1ZQtZMFu9tNyroQzaD7yYylWe
Xlo8mavArENWU7lKfuXbZsvcZtxY8v5t5ilO3UzCeRtKy6GsJz9OIbIJi76x
1l+NZYFnjEhuo1EFHKbISVrYNuKL2nR6Sh0LJhwLP0iUVMB3ETdj9wUNOG3D
E6rNNxYcXeTdYbyhEpR/zr3K/Zx75fs597r9RbgBD6EWldSNdbu3sWGX+TRW
pkkVhH7MmsorxI48mswrQNJh11Re0UR+LlpYUY7g7Ln17V026FgtPWe+uxrG
L1FigtNK8K1jYatTBhvyPTdW13RWQ4ugyZx8zjk80+u7dGwNG3KN21RKnGog
5/Iiu2Uv3uLrMxdfG1LZIO2mOnsnvQY+XnzoXT2PhOlZfKo31jNRwiDySMyS
SsgyeBP8+QkR+4YV5pvcZuLIUZfdDmaV4Od0vNBStw1rnxsraHYxsX9pZfZ9
10rgMtcMWZPdgjmOs9acUWHhnJnr3rTcqgSp9ffnLDduxlVfNQfnn2ChztI4
XoivhLvlXQUKpY14XMzv286XHH9NTpTnelUJ3U5bM+dtaMCEEbWCQDYLb+rq
RC0trPxXLlT7MxeK9ddgK10i4Ca/+xoSwyyMVpqZNm2gFqqvtmeStGowcz7/
M5IqG/tWt6eZ8dRx+vCw45GaCmynLf7hZMPGhiWiPuz5dRCQe61Gl68USW6p
2x5dY2Nkd1H+/WV1cP/89sfzAwrRSvXtUa6XbFSaful099I6iNLLbC+88BaL
ZzzYmVzPRonlKWQH2Tqwunt6/8stZLSRayIuVWZgm5XRjHr5WpAxdg+RSO1A
zwr2rpG7DBRPslaR2lELNpfnvB/93I5PSVr5D7iYWPm5bWyzdy1oUfdsc9pC
xE+CD1ercvy1kPZy3aGHtWAttX/Tj4BW3Cec2W6Tz0RUrLh3J7sW5CmqCwxL
m7GA3fJFU5SF88XW234orYXs9qScZT8a8a55W+9pZxZWp646UcnB/8xVLv3M
VXj4bpzJMGzAjKUtEcXbWbjwatKXUqEGcBlbeOqsNAGLcm6pij5koXvhqjpl
uQa4fAebLAlV+FT1c+T0HhZa6tfXz1dvALKx1JZjt8vQerWC7BsJNjrO2Kiq
rtIAMgncIQe0inCN73YT3+1sLKUkQp9iA9zWqSrezHyLlWMbDfnPsJFbkWv6
deEGeLaBS/gsRz/czuZyFAzn1B+0pmVOa4Cow9wKems4flxLbKD3Eg25A2tA
9049TJvvYZ62jYI/FLlLhOfTUYC8Jjj/VT1EMHck6b8m45BFzjaXR3RUDBi9
adZSD1tqvwUtf9mBekXb3aQVGfj+XOve4M/1oLonPmhnUjtuXpIbTEpkoO3e
7zsq+BqgW6N8RPNOG5ZaD7aJLmUiRT7YdroAp+/UuAZt4+gr9zKR1L13mFjm
RGf2CTb8671ziT9zFX2h1fc+FjXhoi7ClxHOvgsUrw/7lt0M5/XbKnYZNGCj
pVvAjBQmPrlRM/NTWTPoCQbmf1asw+oxz+yd81io9pDIVCtvBvJ7w/YjLRVY
vP7oCZWDLJTZL6DfXNQM6xfR1HbdL0bpicuXrZ6xkChOvNmc0AxRJSc2LKa+
Q3dBHTU5zv3qEdSLVw1pBlnnI0l+VZm4U4ic/1SAjaHV6zy/72kG3+FdUPm9
F9P99lj4vOb4ieNjkdffNYH8jVt8OewedOkW+qFycwBfPi5yieJrhjRQy5vW
1I0rOy1v6FgN4vDsVdYt65thuGqhWutzCo7c+Bj4Q4KGy+5MpPifaIaS2nmU
46NklO0+e3pzCw1bA8clt0Q1w9db42/vX+7AJUNn1Q8H0rF9Tq5SalwzvOc7
P387iYjT9xTWm6xkoNLEhmK5FI4O/yNXsfuZq4z1/7B7+qgNI2+8PbRxFx25
qB4W96ra4eY7O4Ehz2bMDWiVX/aFjhtjR1/pstrh8hKGerlKA+68t+CF300G
vnFc25k11g7fF2xy+FZcg2dXBV9mCjFR0F1Y37CnHb4RKqKkZ5ah5dLsUDcf
JgpEfQ4/n9MOd77Tewh38zFfeg3f9HYmHprTOtvmSDvUVRYK0boyMHC3d5qU
BAurnlXnHJJoh/S4lLKTpgPYN+C05+6KHpSc3lJqeLkNHms/6buxqh/5WzYJ
OFr1YvXnWR7LpxNhe9PnRUb8ffhF93hZlAcVc3SuyhoEEME9lDL/XkUvrnVc
w9VxtQ/Lw59Ok/5MhBAP4juKSw8mbnKvkI/qx+dz9SJmmbcD9yzCR60vFGxV
IpzhTx7AheRRdkRAO5yLml7cwSAjsWzm186kQWwIkPC6fLf9d65i/8d7516f
LQ7UMyKjglTR3Ui/frz1/uJ67s8UCJS6tMDNsR3T9IteWN0ZwLFvJjO65bph
o9BdRol2C3Z4L7HZEDqIUaotjy6t64bvz7tdj3E14HDwLNOdx2k4t7Hk2Dvt
bgh+NL6K16sKl7v1jF5RoSP/JW1ht4XdsOLY5tCn04pwcL3F4OEKOh4PSBSy
J1KgM/jgpbsrs7DGQXObsyEDHUU3SF29SoHyvjZd+mU6vv3y9vyQTgsKK89L
K1nSAbGblsY8C6OhvKebtJwEEV2CJQ/tWNoJ6qWxh25cHcSVEp8lVeQ6UP61
2NImVufvXCXkZ65i9jNXuehsuedsSQ9OL61WdHjfiXS1vo1Hl/XBePhbdDpE
QaN565SU31GwxG0z77nKPkhXvj+ypp+ECXaPzy+63INn0jxSXYT64VnoxdrJ
ueZTr/1TJ98PsF79EHNyrpmnu3t70BomFtlL7wt88wStHzzY7ypIBo0tij8a
shj4tFXD53pkFtpHzZ/ZGNIFc321H5jMYuAwt5AXiZGPVX4t2x3uUSDmZ64y
bSolyXnzK1cROkU9LTirD8u892wdsEpF3fe2pq5zBuFdlaHwcpFezIjYZJhq
9Q6FpRbpPHSmgWPtKUaqHAOPi9K//GioB/kZjRvpTR1g0fZIbcd7OkYnGZw9
WFYHc3VWrDicSIaZS8ecDGPpmMuT2rCJVgXlB42WnzanwOKfuYr3H7lK/u7N
OSyO7866QIwUN2+DvE1LUr4r9QPv+/1xnnN6ULy6XNQYWiAyY2VEzdgAfOg7
6aSxlIJieoIhYf2NUO3roSlTTgMu64I7k3P6pQKnmaMcPbrJ4MeRyTl9yrNl
ZZ5ig0gZMVp9s4oC6gG0e9cOEGFd6HHpjr4BbH0tdiXLlQLxhnenTeYnTQeu
KrJSBjDXxEPIgZsCL89LJXlXdMC3n7lH9s/cI/Zn7iF4qyrsHRcF5x5qc+dX
7QOvthVHP1O6QeJrxZXuY52od0wyJJRFBTIw9prp9IKO3OuBbst2dBl+PlER
SYVTkt1p5DgqDF5b7z/Jh2ET/1V5K6gwzCj1m+RDYfgFR5dyKsq1XVVn1PTB
sjc3Y6Mjm2HnbeXq/qtUVL1W8SXxVR88ZDmvFelsgdE5ZlpL9Ki4YKPQs/PR
fZBoNj5O29AG4m2Nl7+29qKKuvAn/6t9YDOdv0KpmgjU02V+gma9eKfoc3qF
fx+oRefsX+FCgt1hAypvMnrwwqDvrken++C27rdh0XWdMBZ1Rffy124cca71
yXDsAyZVyuLRyi5Y+kde4fYzr7A5PUMgd4iIh+Ah755HNGCeMOd9vrEDiMOf
ZC6OteKon/r1tms0YG2h2z1SI8Oro+vrSs43ozg5h2pznganMg1Gty2iANvo
emNAQAOuT/4sfu0QDb7m8h+KkO6Gc3Fbd12TqcWZ3sPfbfVooN2VOYuk1gPx
ybrREw0l+Kw/KuncyCBon9w+ttCoF2Dj/NnJu3KxnI9Hffa9QXguHVN0ci0V
XsiYXf7Q2Y0aNe6Lw5mDcEcqd6b8lgbYXGPepRPejRUKyWp73w/CoPx1s626
jfDyzpcGybXdOLFgEK58H4RLt/ceNtRvAq2AimCuNxSU/bzWi1uMBv2mtbYh
e5thpdfek1EaFNzNGNjsqkGDFfPaQhT8WsD48OrjDrxd2L+acYRqQYMkV60r
Q6WtkDNtwuDV3U7ML1d9Mv8kDWR8Kl8+X0yEoZ95Rf3PvOLhz7yigak+Kyil
GSXJx0+87mKAxbCJQklxC9iubPPe3teIMhods33ZDPixdIaThXAbvHxcI6Oc
V49MAdt57VxMEKBf4o08RISmlresVrta3D+nkHxgLhNaDKgTMRXtIJ9e/kyj
uxyvbTvz6Ag/E7oUXz7aqt4B9FMKjRnKhXhOolO0lY8JYWoysm7+nSC73Szg
bEcWkuzTqB8532dk/ybq3BEyfNNxOmYHXRhfV2+gTKBDgEfuYLhuHfSPX3wV
Gk7GTar5ziJ9dLA4cUby7B4C6J/b6utY0olCz3eHCnAzwC3A7Lr8wnr4ftlI
yr+zAz8xXsUckGbAaVIUaW9fPehX6LuQsklY6TU6rLKZAaQjn3ouvGuA0qcx
Bxd5tmNDwscevhMM2NxzRuNcbCPQdhW0Xehtwy3MVd/5YxmQe4g3JPVWE9j9
kVek/swr7L98z3T61IDi06tV/IRYcDylramyuwE2yX2+Wbm2Hh/Ot6pyV2dB
xFfTDc2VjSAaQ3gD72rR/cdTOU2OP91g/GLZcEETfN8vVMx0qMRzsY+4dxxg
wVL7VO+ujGbQft26VjKuBLOerdSvOc6CjY9eWo48bwGnHD6lhafy8cvri1/R
jQU3TEnGHi9b4emamRSl4Eyk8cv6R7qwgLzGpdw8vg2OSrOEL7eQsJO2sOs2
NxMYT/c2H5xdBVVCbkEHpEiYK29O6pZkguD7Crt9KtWgJyt1ssq2He813MzX
W8OE7RG9ILS3BuL2TFO4vJeI90f8bO3smFB94YRhpH8tHBE7ZnNmdxv2Wlix
Z15hwu1zBnx5jXVQa2qxZY5mK/ZxR546Gs8Eu9nKrNp7BJAKk1Nb/bYZQ7nn
Oc9uZoKcnO+SEcN6WPNHXtH4M6/YUyOkxP+JgCfGa23Uq1jwoj7hqslcAjxc
drC/uKQWvbfVD16hs+DpatrtkVcEeLKarHkyrwpfZ5/bO52LDVE8UsvbjteD
bkmBfjujDJewbj33XcSGwu85lkNKDRAs47dBc6AIXVLz719T5uBPrjmWUBuA
9GZzpJwMou3RN7z7tdiQHWFcWBLTCH6FUlI91lm4RSpN/+lqNmhC07yCQ03g
tHqoWVGbiImnlWfurGVC7t4SwbL8MrgqE7BQ9HIbZq87JF1LY0K6b4FWWEw5
FPRJvFmV1YoFTWdNLWZweGJ5aX3AjQooXW2fXzvQggPL1jNPLmXB6oZkEaOr
lSAaWKNt1tiMx3eGHBU2ZoFPmmtVoU8VtPS4bXcqbcLA/ToS7CMsSD7vZpR1
rRqG072Xmd1sxBXvVNYK32BBLfWx776YGlD5I6+Y8TOvWKW/7Nghju/YQeJx
nQA21Ou6ljIqqmBQcKddqG81SrprHb9kyYav8hozzMjVsGyiJMXKswI3WDms
2HeKDYMG98g6QzXQ0sh9pNq3FJV95E9TAthA/cpWX7KoDl66DF1ZWlmIZ/y4
2mQesoG8KquLIUUAGdHSnqot7/B1GqPBOZENYXU/KIGZBNj9QepYwgoiMpQD
dwoSmLiIP/FsfF4ZRNi+dO159go7+UdXX6Kz0fhCzkzhGXWgvUbr+M73WViw
Y/3nKy/YOC97jpb85nr4nNN/euXSQVxgPfra6i0FTfdg+gsnIvTuPDOlZ+BV
7aSeQYOslik90ywiMOrWP4CdFkeNEo5T8Gz09xnL+Ulw9emoYSmbjqoTj5cV
jdShqodT4LV4MlgRVhdIPBvAE9OtH4vyUdArmq9JvawDBvWVPq+KoWPqU+u2
nh9VuEpXgFhiRoHztd7HJt+vtVXTvnDy/Vqi129WDzSRwYmrP3ESF3ycinM4
uLTdXYnJ925t5c4fmHzv1l7X6HVD0WW462suTL53S6PsHg+TgzP7Iy2ZHHwH
v9jU+7iae3KWWbP6MKZWXEZYvhtb30R/3RvWBfsOziaVtffjlv/H3pvHQ/2/
j97WNkWiQhtRpEWixdZlK1GhBSEqQkWlorJVtkSKNm1SobKECKG4smVfxjCW
GcyMmWE2WiVt90ynz/ec8zm/3//nvm/91/Pxfsxjul7bdb2u3s+JnLxy1LUP
2euiXdpOU+HTsfRnG1exsfvicE3RsWakzFGJGdxAB5nxE3pTUth4IT7gexO9
Am2LrhSbxdFhYXcLOdKfgSWrNja9jqBjXkLA9/s6VEisfq0/2Y6FGnv0Vbxn
9qKzkVe8eDENml8+efiCP4gHy7t9Hxe14bnVz9/1zxoAF5mc6UtZQ6jhM+Pu
gsgSVPISLdhJHIBNY9mcvU109MiV6Z8sxkC/Ri2L8uNUiPhbj7j+rUes/tYj
pilWmmOJgvqk30Y3qI6M3yQLy5XkBqBxzvH7R3xYKM9pPbTvFAmPXN+ybTpt
ALb+zefD/tUnNRilNX6iDuLN3RnqBFomVrkedNIzYMKx+a82eEpQcSvl90D8
EiayuFcUXJg0kD/MfLf27gBGOlgVHwvswv2ev708BXma+hG9yatCe3HExtnr
Sg8DNVI9JFcK8o0hr/u39srQsZdQ3EiaT8IFbyR3dfwcBHU386PhXj1o9DZU
ixPDwMA1l3fvzmZAeX/teTl1KtZ42feVZxNR88R9l5oWNkSPXY8Q5ofj1rG6
gvwQtymK/8kPuQ3qc4Q+schatwseP1vxxrmbqkKfWGRMQ/mAAwEXikgUTj7K
xHL5Dk1TFRYcl5EODzzVhupu5x9u9B7A5/tivlW+HIShxPmvGUs68M2ir3dO
VLXjxuDZWyL38qAjbEss6VsH7mr/nj5FvR6fPW+Vf2bHB8ufpedrZtdgelzz
m6BwFmo7GLwS+82EctHfmlE69Xi53OGn73E6Jqnovryxkw3mxI8bshsaccq7
HFd2cRdGomdt8UMeuG527ftyuhnj5qxLMO0oxy2dUVnC9+iHgjV8hxWKBePn
+XmF9yDKBnwYfnKTCXcNe386yZSiTWgm3llPQ+1rz/fYlHCg/4QSKTqoFFMZ
iaxDQRQ8PWPuNFVvHmxx/h/1VNUGcUdBPQX0+f+jnmqgkVfnFHLxbLwbb7Vh
AcxMv3ms8ko/nDy4/U899dtqlp+gngKn0oE/9dT1vWMjQl/ZutNyeUum1EIt
Vf+Pr+x5GLVNyHcq5MVpCHjYtszTQl7/8NW2i0/YeLyoRloprgJyU5fKKV6j
Q97Ob2ZnddhoXlOeVCHRDNE2ScszDOkArIT5uweH8K7zq+GIGSVAffTz2o72
AWA7b7Se+2EQd1pF69Put8GW3SX3U2YP/Hvewj/z9l91n+E/dV/JauqfdbHx
xQsPwboAjeGMP+sidjLvTz34c8zJWFAPgnqRx5968P7bpT01swbw++4cowh+
GTzLPN425MmGF7VnNK88puKK00EOvzi1oJq8dOR+Egd2Oo83CuuvbbM+cj4J
6i+Fl8fThfXXtUTxy6zRDlyi0JV2NageSupmbD+9gw/Vzz9IFS/swOpfSjsZ
oh3gc9F/dfROHviL9l+J8m1Gg+p3r64K4naja9hP6E9wydi5SrSqES+14OGF
A11gbrDh9ObbPFiU6vVn3IN3fGcIxh1eHD33Z9xPts1TCr3AwWfFAecDTUnQ
F7jdy06ZAgEptlvc49m4J9Z6TdHKbnjZvOVG5sJeGI5LT311eQi/zFglXqpI
geyVc1fGvO+FN9anXYSetMj62Qlb4/tBcbG/qE9ZH9Q57VEW8sLQ3DtCf1p3
8oUXQn+adNkLkuMACwtPnHB5sL4PniYUDImFUMHXL5V45CMTs08t2bpgHg0y
Q3+X0e/1A8eA2Cu7g4V309aeOq3WC2sYeerVBTR4t6hnppkPA6MfDKyzu0UH
TtL6fosVVGC6kf7sexs2W2sL9j248FmrQrjv/eP9Dv1bX6/+W193BzTJiLfT
8f251dfkvw7A+O8Lt/z8qXApyGfxsWY6xprLbNpc1gua9updgdpMYGWH/Vzj
QsW9Z3uUoolUuD2p7sXKt0ywdzT4PtRNRv+45GfD8XT4eBSpvyezoPLvPYbt
/7jHAOe/9xi3aIVphIg2lBgmdzy0GoBoCHMarx+EQz/E47hHCZjtPSZRbcUE
dgNPkm/EgmvGobx9+vX4pWP9uMxBOiRmFph4ObFh7TvRtmKtGnxQ2Z3ZfIQF
r2b2evrPYf17H4B/9oH8wTFa1/piNOuYRUm0G4Qp0z5v9Mhkwi658MyYWWTU
YjzbJmXMg12PLruAav2/8wf4J3/QFM0xjnlSiDdVFC/IcYfBY4+J+89fzWBr
eGundEMhuj/Lvbr7kyDP/HFpqvypZpi05IN2HKMLu2aOEE8xeTjlpFpSv1MN
rDl644PQnzbSs9dO6E9zDqHLCv1pgwFbYtcpD2HvbqUTXic7ce22zLH1gn3D
sK5ZZ1htEC2mLax+tr8L/Xn+18nH6HDtWKCS5y8mRt+Zx3ni1I0LEyRIEUED
YDRZWfduMxFnraZejpjfj5qTqwLGl3KA2G3Dv7u9AV319eY/LO7HAfUO2Yr3
HAgqmilpRX+D8HTs7UpmP+aXuaxqDuXC+au1vf+Lf0xE6YLcWqF/bOZJ+2hT
7n/8YyK7B0WvHKyig/fY+U3Jov+TizYWDMUK5te2x0c41uz/+MdEzmyr719o
zgSxUdp5PwvSf/ihc+PMB7/5IEq6Mu1/8aKI/ODtE+mVGQHDuC13hP6uRzyD
u0J/1/ht85VCf9eRdT9bZAR5XeQlW7dPnp3gO78kONSPBgEBL/f9Uh5E49LE
tbYBXeDwxGTRY2867Fu5wNvpBxO95jSybgnyP9EN6useBAzAHL29xKpqIvZ5
XNMYtuqHjFiGZYMSB85anvsTt43rTYVxg6hrLf9V3OCfuGWlfevk7qOie7HY
/TNarfhWv6T00GYOxBrVvbqTQsWsetrMoKRaXDbyM7XmsWBcPunIKHynImmJ
xLscqVwkbfsaLDKNC5Qtv1mrBOvux8ZMlae7W6H245OcvaYc+HrR9M/zZa6P
igTPgwFbJkT4vFazduy0L//xJolM0+n8sFGVC4cODK0S5gPSrr5XhX7RdYxk
U2E+cEf6UO+aex0ov3lw28EVBExuO1Ru0S/YJ8W1bIXPx22yCXQXPH9EpO2g
8PkFWuceCD1vm2aYZ5/SvV6mF1lME3reZnqEZwn3eZGQ8c9CH2aPrEa0cJ8v
e16RdDOhA/XXWP3ytidA80GLd8+7ef/+nI3/fE57zVji/+KRE+F86fnDvZXu
bDAebEKrld/Dk0MIKCH+JlOXwofLFuceT6E34e21h6yS0ggwi6UUqUviw7Jl
076YDZdht07c6/UvCDj38WH1E2HDwL8hPSrkJzE8X8BhPuuIhpDfGqtbFLmf
hH5v5XRmU3LxkptIRiqT/28O//AC9Z5hYX5iJv2jxECQn3iHz+cJ85MV+4se
C88p6fW3X0cJzql8OZ1XwnPK/KTZE+mUMizUrCD7x+fi8epHytm5IxDDrePd
yi5DkS0hEguC6lFWYkfcoVkjsP0y8TLncRminJ/h5B15MGV3QNCvnBEgPje/
tzajDMkMaYvI7nowPPlY7fCMETj8WqV3zouy/8Tt1Yxt1/lV//H//OvP+wk+
wSf4BJ/gE3yCT/AJPsEn+ASf4BN8gk/wCT7BJ/gEn+ATfIJP8Ak+wSf4BJ/g
E3yCT/AJPsEn+ASf4BN8gk/w/9fzoweWPKV86MFTEcqdkZt5qLDmxYo1+vUw
/mulVMQSCu6b0ttyXYKH7u4LXVfeqYNpTd88Nj7pxnq11nC5GB6GR2qKBJAF
z7stmS5u14Wq127ol9Xx8KHsF5XXIQ0wx8nx1aIuEq44nfcuYTof7aA+J1G7
ESTTyPEerh24TGfeeLklHx84L3AqJzeCh7+eV+kbIq6r8g6ui+Jj0K7gBzKx
TeArP/fp4LQ2nGzidEqmnI93JBV/dVg0g4f4vtKara046hCWxvrCx2GJU6lG
483wYNjwwNdbjchIqtadu3wYI0WvMPryWoCBbk80emvxaOyKwC+7hjErX5Ou
sqYVRmVlVysGV+HhnyfEVYKG8bQc5hrcaIX6b18q5Ja8xUn97Dmn7g6jWdXY
lT5mK5j2FrzlSr7CGQcdIoayhrHEyktPzYwA93+rXFhV0oufDq6Vouzhos1C
7uLooiZI3LYw30G8H23Gw44NT+Pil8dDklrsRlAUH6JJO1HwMr++zD+Ni+vC
8e2LoGZ4XB02pNbVg8zJQdWzxrnYV6SQ8W1zC4Ssv1zPNOjGbVnGXKYlDw+l
KeaMy7ZCocY1+9pbnXhs4MS22Fs8nO5i6+gS2AqbQ6RiLPI68Lbj1wIxBg+z
zn5PrOK3Aqv+znG9FiLuvi5ut16Tj3Izd26e5kyAma9lf0S2EfCXSOi2LG8+
yrR6mVrWECDupJaxiF4Lzgn5tfB7Oh8D5vkfZBq0wbQtWpvin9djqsvgmZE+
PioNX7nQnd0GSaPvG2Jzq5GfoT8uIT2MMunJysvmE+FE1VgJsewtzpcuvqSr
NYzapjyLjZeIkOUwskc9qRBn+Wb2ilsMo0OBhm02nwj1NiEhog7PsGFK9Ja3
1sM49Xvppu2722GGjEjvpwdUnHLsaMTyX2y842+oMvS7FeL33otd4kTDqiXy
d9fdFvC7tKiX51rhnsJvvxrsxzaC1amyfRzU/eRXExNEABKPo7ZbvQ/tVVfe
innLQU/xpVs9Rdpg5dU7u8T3UjCvfsEDvioXA8MtFTxvtcH0IeVqmdAevBto
//RXOBcZO4zuR8wjwoy1VN9Uxy48VyC7eXSQi6/q7FNnvCTC8We1J5Q3k3Dw
i+HOzRt5eEA9fcsa/XbwDPj+zoRGxFs1tY6EGzxcYC4d2dfRDnwN62T6YQJ+
t80zluvnoegz23nkwx1wwY4Vcd6pCVPa9CxylvCxa3Xd1yOjHRBmvyfy19Ua
DLw8P5nmykfDo0FFj8NIsHjad9HEnHLMUQ89uP4SH7t5q54ZiXaCyY2cxY1L
CzG2vzLQ9DEfVYOk/FyiOsFuRqeri2kKztQaM6c85SMnbH5MxIdOCKvuzF1F
oePsVe5bGziDyJQ23RX2kAjOShW7u+4PoHxrUMrxk4N4/JD0iZkf22AtkX9M
cSYdNQIa6/Xch3D/ywSZZ1vbYZ6pt3iBDg1n7563gNIzhBLNFoFtoh2QerGv
N0yPij3vTa55O7Bx16L1aeo1HcAYeSD51a0Pi7/P63zfzEZlDeJOqVgS5F4v
ceyRomB/dknfnG0cnDsqeyvduhMClZbtX5HcjdaXpSrUX3Mwf+r91sWKXVCz
/OVeGxIJFXiPelOXc7HpYKn5yuEuUJfWWDR3nIhZNUsjybFc9Ct3XCZT0A0B
NKrsQHErzqP+PqHG5uLX5VljC073QKuGi+kWwTynL+iQbFjNw9ex11WerSbD
CZuDD/rdK3HWxl53nicPX6a0hCzqIoPieuX2yz2FeM//k+3pcJ5gPV3uvB9E
AY0HVa/ObEvEtStXzwwJ4+G0rwtkGGK94IvSrb4JTPTZQgs0ymfg/a0VrVZl
JJBupv04s4mFDzoj/ZM3MHAYZTfbETtAasli/sZKBpqtHbdu2MzEtO+bf7Zl
d8JYiPqk3X0DqK7jyJ7ewcQVcol2Ffld8KDy8qKQXjrSrQ8f2ezFwqQfWnNO
13bDy+1c78hyGn6n59JxlIVfDLMvPxzpAfXD2+S8QqmoMUndgHp9EN8MENz1
fpIhg0BRSjIWjEvD/h+X5g/hm57X2yZDL6ykyx0cn0lGg/yXTzfmDKFWnvLa
28f6oECDY5P3ohPvvsIWXM3GcFcziaPX+sHL/b2ubSMRqae2SZhnsHHYYt2J
cEcq1MjIv7c904IzRLqjGqdwcEm7d+ILChV0zMqmZVi9Q5O1ii8W7uDg7t5d
T8t208BA0mWDyKFilMubVuHnz8HwVfnu61/RYHN9yN7zO6/jV3qpiYkHB+0N
FBW48nTIUmCJx8QMIbNp2r6MvH70ietXsVrYAzxWMnNpzSCeHqffdj5FRdGr
crofvcmw/8zW2XIfWXivSyqrUJyGTjlW5E1dFLi9fduT19+ZGDiXPyvoDg1J
G34f6/XqA1adxfvOXsG4WLiVfNehY9uRL769U6mgce+SXFv8ACYYEuaPDdBx
wRvMKBD8uzg/+M7r5tDRefe7vENBAxg6PrTbsJUGC8vLZdsdqfjc5zXj6zIG
7qEd0K0ooMMy+cpgi2IKem44kldcx0BvUUfDseQB8GMkeEQt7sKiVJPD99yZ
+FB19pMv4QzQCauUoksSsUG3LsyRwsRDO6yaLuxhgtNiRffP2fW4WW99kIcu
C602SzWCNAse1D517btSioo/jDbE72Vh6tbJO2feZsGW0bGPkzMjkc5ObYgN
ZeGgmdgpahkLtvs56i+cw8XW20nma9oJuPsUObB8Wi984zcHtQdyBPvUDffc
uDb8efXDsW9VfaAzuu3Xr0o2nsIHcv6niWiyiv2hzooKWz8t9VgxOISfhlUp
xrvbkZQkn8Kyo4Hx7+qKX32DaGMypeiraQf2JTav8j1Lh8IXBWaPEll4u9Qo
dKsJCdMKr2Y5FQ2A63vS2XFFJiq5LroxuLUTZ3peTfabzoSx7K+/FNwH0D0s
ep/q8S50uuD4+L0dC545PE83W0RDv/lTRr7GdqNl0JmKZcRBYJWbfXgn34sd
0+QaiR09yDoney5oKRssvN4cfPOahNpFIl9fvyLjSK5u1M4wDmy4avIlt6UF
Z1+cZd5sTEGXpTvTviZwoUvFQFbp/VuMnv/dLsCXglsXH1ts7sSDnMmSO5NW
+uLpOd/3G56j4Iwjkh8tnvHA+n+PJ9j9jWfZ0YU3v8VzcQ/v3aT1uwlw4+h2
VZvzZNDYMPQnzuuXtbkJ4gxjH6SPC+NsYLIsAurYuH1v3xQXGyK8G7/2aJ41
FXqcdgY08YbQXEasXmV5OziuK9ckONJg5nnLP3HuVr74WhBnOGtx7E+cdWbr
mQvjvJR3LUQQZxhbK5otjPM+8tAxFzkmegyofQ0O6oRLnvc6yJJMcPD9Jt58
eADbDUodjxp1gVtnU8RTFxbsbdDNEMbZYiWJI4gzxDuurRTGOeiJ9cN1kUM4
43zIvpqafgimrj6SotADnMky+kPz2JgR/HNvK7cP8mrXLNCndMH5qMPKbxoH
8WT4sN2dQ1QYXlKyyOUkGR7Vz5QJGmeh4yKX7ZRPVHi1ZnVuB50CFfv7o4+O
MXHZPT2V+CQaPPcyerLbvQ9+XNoY8aiTgeVHf/lYAh2YMbOaFSWp0JzN3qR8
ewAZV6rsb3fRoXkDn7+AToXAR782X55ER/ZY7Xrm7QHw/3FevPstDVTOqLIb
7Kn4utU86IEWA8ImaS3bkUcH2bSNIcJ1uqF4OFewTsH1SvZ/tU7hn3Xa6TeD
cUuaiB+3bzskS2DCPJ/VzxTcmODWkOJwqbYeF8r0n21cwIIw3uOo8cUsyD8n
fSM4sxQPt6jUNm9iQarOzEjmcxY8JNzZ9vM6E3saX8zpLGKAyZs14sklJHBU
qPpzjoR6ZgvPEThV8HmT8Bxplbyv2/GOgfUS2rVqpkx4oWRd/iGvE6y/WQVL
0QfwzUf3lj2tTPgqn3XhSHEXPAps13/eTUffpJXev71ZwHm8r1Cnshuytpmf
NyymoU6LaHWbyCB8F7MVlR7ogTMu519aR1Kxscaoc+nVQdh6pmwvR5wC24P3
3G/Q6EOrvpHRcc0hyMreeWdQvRfYDxzE7oqS0evJrcB3RUMgKVWia+XSB6U/
Qm2F54hsnIvwHIFzpdMk/4tzBP45R/hudLu7oS14IV6X5ijBgc+9EQxHwTgq
XHkzrWnHO3Q4eksxZRsHDrqV3BxzosHXTQteHwooRk+sULznw4FKFw+KZBUN
loqdm35p03WcNE13SO8YBxRufKhsnkyHqMSqP3lRqfVpYV4E68+s+pMXuZd5
ak2/O4D1zi5XbP0HIUq0w8N9pA26CnY2D8+i49mIpLiz+4dg04749Ebrdqjc
pxoTs46Gq3teqa7sGoJ9CdoxBpIdoNH8bDh/HRVr2R+mizuxwUv1sumJyg54
fbSNLefch7R0OZWrbWy4bGCTOv8iCajPbqbETKLg6SgtxhlrDjSqambaWHVC
QOG7U19Su7HPLEzsWzEHynSD9bzndYGI/MYZt+pJuChR4fE0bS68mOfs7Uzr
goj053/yomMLWRGCvAimMCdr/hd5Efw3eRH8kxfZpTUPdhyoxPr7Tc4jXjxY
o6ayx7GdDGdSfNrutRdiRIcu0zCSBy/8jKrq/ShwDHftPG6diBU52zE6nAcJ
eeselP+iQNICcpp+IhX9Km9MvvqbDUrxT3et+NUK9KxPS3bb07Dj9cpw93ts
iLplpTs9qBWmLDqmdaKmH3umig6X7OVAuPWUW43nCZBnIkX/vKoPhyOVpiaV
cmBE/hz5p0QbPF18IOXCbgo25BtsL13KBcM3DUM+8W1wuHAnyTKiB/dP9nvW
FsaFaZ6vDesXEOE9+WNimE0XzubO6nzA5cLjbzkDXRlEYFHb8xJ3kbDQe/Vm
dz0esNX0D9zd3A4JT15WvO0VnL9c5X2qt3gw3G03+yuhHU71zWG6+BBQdKGh
tkYfD7Qr5BvqfDrg2MWuXb2uTSj5YXp+mxof/Nw+iVz61gHvND9OfnK9Btsf
zqqUdeVD18eR1+xIEiyMCs4gFZRj6CVJcfuLfCh+d+zTi6md8NMy5qu4aiHu
uJ56b08yHyiXU0rnh3UCgy++6u6WFJy/l375RyofeHfi6grHO0EyOPw7N68X
k/QXV+5y5kLpCv55/dz/o26Ff+rW81FTHg06U/AheaFzzzMuOB62Pvo4pBkk
L78yqSH3oNfYJiJ7jAupUxWmKWxtgW1N8x4s1u9Gq9mOG05a8SCJ/kx2YGYr
ZBQdvhiS2Il+WaN7gm7w4Hy1m97c862gp1NcNpDZgTPG070+MnkQkKc5UDLU
CrXgJ5HTRMTE/oa2TE0+eAdnbC11JEA+3+laQjcBlz1pFYs5zAdPmZa7Ds0E
mNy52VDHrAVtrrbWH0jjg1rKTie+SRvEXlW81vmqHg9sjBeV7eXDHukdHysL
2+B2UFmuRHE1JkoojydOH4ZzJeGhtMVEiHtqrX3k7Vu0z3IqpK4ahtO8s7r8
aCLUxl3do/m0EIsHV5oUbBoGpSaLl9O/EGGnrGKuw+5naLL1xY+ZNsOwcYPY
krM728Goe0dG8sceHB3Lad66mQdX3tYe4uvXQ9lQwi9OZjfuk530atklHhh2
EjeH0OtBPz3Yf55bF56wdymc/U6wXnKuat+KbYCUjhcuYW0k/CGVQ1sgzQfJ
9WH99zUbYfTLD0OFfR34+sMBpRuWfFCZ4WGUTmmEHIN5f+5VwtJPCe9V4CPR
+s+9SorSw+tTJrWhROAbh10VfMivE/8SA81AF2OT2LatmL5XasW1z3ww07VU
l5VogQO/1f7cq4w01ArvVeCA/sk/9yrnYudkBTJqUUfbyWpk5zA4Kipt+Lmu
FXoM5P7cq0zJ+XOvApy0t3/uVS4qXCBO0nyLpnPPX429MwzJl8Ye6HJboVvt
NbdP4hXaFGa9Es8eBq5kMQSYEiBFwrb9TWYG2ocdqU0vHoaSRR0NUtcJ0Grp
/PpKfTfKrLJszhbUU2bBXt9X1tdDlXNhgmdwF17lagWcrOBhxcJT6b+9G8D1
x+vYe79JaLS/ltkvyceA1JxHnYsaoXNnbahxTAduM82YRDHl49gil0Vb6hoh
ef1roylcIjoXhDVohfLx98zZZy0CmuCeWK2ZvlgTTvpwII+5ZBir0uU2XXnY
IsirbSmj1nXIGO+1dbUZRo28nN8+Gq1gU9cxU224Cr98NWm9eWYYG0b7HuZG
t4K0fjGF/uwtynSELfNIGEaTuQxDI0orJMhI8m1FijB1duiu9c+H8YVUhWKX
HgFiuW93XBfPwr4vm6qNi4Yx0N1+ivQVAszwbbpKWU7G3Ka89YQhLtbXeO9x
nd8CH/Zo7/BO7MZCG9u8+PU8nKLtmGXxuQUy5j3iun7uRGbtweczI3koRzUC
pYOtoJZg875mHgn9xbIeOxN5+ITka1BBaoW8bG7/5cQG/L1I4klTOx83UX9X
u99pg6tub+exCe/Q1mia8XWJYVTu2s+MFidC/NxjlXc6yzHXQzzfR2MYg/LP
Tv10ighPkqkNsr+K8NzsDLedZsP4rNuvPptEhHDnw3fDrZ9jsamBpK71MB5u
2K5vubEdsoYNnXW+UrDxQ+xovBgXGZo/HEwOtYGPSttI+GIykgLE68bdufjj
4Y1n+e/b4MLq9o+V8t044mI2r+cdF9decx8xCCdC7OPEyR4hdWhiuqV6ynY+
7khtsyPvIYGEi7PHyqRK/Bmzyms0mI+5l3Yk3SKRYLEeAy4dKcHnqmmVN+/x
MSUr656fWycoultUa2ImmqgnLEt8xsezDu8qXRo7wTJ5l0yFQz/SitIorgls
nLfE5MCujSRoM5MqHVrWi28eWmrtkeWgXjPZfGiUBLaJ3dMZV94hlbpP/PQO
HvrX6He/SSDDTuclz/JnlOHvpcfdaYGC8dqsV3pnDQUiCGvunzyZiZV+k+4o
C8aLMonlo9dGAbXmdxq+G2noU7N8etLaQbxwfv/Hh4K6tT7zlV+fdgUuC2TH
6AvqXzOtkUXnwmggvnJdd7XsCyw2X+r49iQHp/7eH13MosHhTMMSoQdMhEs1
FSUSIFu2SVvoAdN6s7ek5ioH5U8/4b+70AYqv0bZny71wevvvt0WfWyMrtvi
cXs7EcRnFPO0VlJBJSTa7YsoGxlJ5wsq9Nqh/vWXfd/X0cBz50kzbZEh3ODn
XtNp0AELHSDd0oYOYRGDd36+Y+GORzksMwMShLeLqchHD0DUcv6HdDcaftg3
p3Dwdje0Y5/nmoeDYNqt1uxf1otGDW6ny+t74JYbcf2zr0MQ1ByquvRuJ26+
an/6x0My6Aw4/Rbfw4Gc2t4pc2mt+IT95KS8KQXei0UsijzBBe/zOYTYWZX4
Wf/wvYBACgRvJ/6eZMqD9WdTKI6VN/Bz9SFm8UkKhAYfZYem8WDDGlo3mTmI
dE+tH0I/at/9l83PpMhQUCqmekx5EG9s1VB+8JkKZxfdvkL3pEBdZp/vciUW
BrvYB0Zl04B1t+DOcnIv9K+5Lt0qw0TPAYaDjKDuuFzPP+R9uh/CpS8fWUEY
QPmvlzykWHRoVz95/eJVKox6a5VuFsxnx1Exn75QJjQ83brunRIDRt6Opj/V
bseg7NxNz8aY8PGKpVzBFwbsuqJmHkhpwvrVHn6SpixQkbuSU1PGhJ1ho5mb
c8rRWJkXv+UCCz6/SxEr38GCejXtJ0anUnD/AjXRpjgWnNsR9V4qnQWn3SW4
ygYMfOGtIBrykAn1++aWC72p127zvh21GEDVk/rvpbRYUGY0ZfIB227YnmKx
58tKOqaGWQZ6NrBgH7uFK7e/B5JGPq5PExfkad97TSSdB+Fq6YyHvoK6dfEa
UsSKCAKaFylnDDPYULm8/qZYChXiRLY4RjrW45s9V8XurONAxW2Zj5dUaBCV
u/TjcuZbnERedrjqAAdsH8WuPZtIgyMuDPtWqec49PxxbacgP3+x2FJn7yca
bHQs3i70jrKUNmUKvaNLPl1aJvSO1jksjToe2o+L/N6OLLjOhiCbAUXqHBL8
iF2YEmDQixFpL2/umMWB9sNLEuZQSBBac8PoZWwNPveL1PEW5C3E7Q8cXc+R
QXGBH3E8BnHcYpINBPHg7N05rVPmUuB0m9u9+YYv8MhkHUueIL9dRNWdrl4i
WKcrDs0UejiP+xyWWWHBhaPGkkVCD2eTCvmzXHU3vpSjG+xN40KNaaW4jxUR
5EiuOp9WIzqHKl1tiueDm8EazYy1nSDTt15j90Au2mT8nhr6lA/f7jSas552
Asf0jIjQM6n1UP2S0DO5aPH9eqFnci7pwdBDzXxsCGBPW2Q5DHljaZnMae0w
SVx2R+tvMm54wXgrNoOHmxbam71Mr4PvK1f0EF5m4CH4cpUkOF+KWldoP7xN
gBvv1bKNPw3h61NT3mWv7Efp2ktHlq/shlKvhfaPnwxhoFRlmWx2PzZT7jxa
WNoNmey255MU2DjF4/Wmc9/7MFy0SvVAVxc8lLrg1mY1hNyVYb7H51KxadJJ
n/l+PaB0R2vJPXEuBqyp/P2LR0D7374yW4x7IataVVIpahC3p264VZ5DRftB
CY/4QjKUJdlmf3HnoGdJljJktiGVPCkwTawfGs+FmL5UZ6HGJ2NG5y0aqoxu
zHbi90L4ozsHaL+GcPqMu5ucbNsxvdFNp0mXBqt3vVEYk2ZijCcv7ZgxHQm9
ujHn/PvB3mppy+5fgxj/IDNa0lKQT+mMvmFt/5/ev+J/ef9uE/qmqrYNoEqo
2KfzDDpWYsGzxXFUWIMXSL+rWPjdVFTG2JKEQ3Wfzx2JGoDzTtN1g+YP4HhQ
lZyS3gDmUjxXV4rSIN4/rU3PU7COKi8cyooawIY0ZwbpOO0/Hj/Zf3n89khb
teZZMrFzcZtKjH0n2l/IXrG+W1D3BzhOlrlJw095q2LkegfwjFrLq0TBPq9p
42h+qpiKMzZbFlD0GEhblLXkuzUd5AnRe5V7GWjy4t3OwrBOlDsdsCRXjwlz
/vr9wv76/Q789fvtVzBy0tnbj8ThDWMNUQy0mUUcDqXTQeOv92/4X94/8g/O
+pE5A0hmP2Gp3O7C3SLPnG1iWbB66zn+5m1k3KqUZVq9jIl3+p9rnSkbgMr7
JgbJb6kIxuHPr73rRq0XRWsKJg1B6/FpK7ecJ2FbiE+hewUT99hUR7ncZoDi
Bhb7/VYK6r+Y5/P5Uw+eLB1tCXdgg71ZcsX03CaspW6Y4XmQhfQEYtd8wX4W
ofaLqMRoRVODwaWcVRS8EJ7q/N2fC4eDXh+e/KAcLwpCKHuXhV6FUk/j9VgQ
G/esxX1OJYb2Q1yWJwX7Mmds6hLk75MMhrW11xfi7o9LLUfvsXDZ7Jh9FwNZ
YOMVqKLsn4IeQXODdC6xUDTmbtedFyzIzj1WM1mSi+Uh8klNNAIUJkVMIpv0
wvN9p//MZ6Xgq4sE8xlGzHX+zOfXfz11Rn89dcv+eupWX5TOPN7JwNrtey11
MjtBw3ng4WRdJniVxsWEKQ3g2IxA5eyQLkgC7kvdeBZIk49+CSqj4uGeaqJp
l2DdOhro+IkPgW56sgLbhoKuiqG0U7QeSB68HrbDmQ3nniWdsRwZQumm3wmp
Rv1QtdJ4s+KybtjYm6QnaTaEM7Wj7qcvpULUzXVfHnr3QM/eldN7YwaRhA0j
T9OoMOL/WYdWQoaaf3nbuH+9bXOaAzVReQBnX9ZY+1B7AOQ3XBw5LCnITwgv
5cviaWhWfHTTDfoALGuRZVcM0KBLRNugDQT7tlcFIySZAcfvMn3UCHQQO3ko
nWlKxmLpwCp/HSZI/IxZYv1q4N/zBP6ZJxUSRwxub/BF5eS5TvfWU2CGydj4
6yIehC+7NMt2ayEaJ1oaTxXMyzunLaK0olmgqRFMXpkcidcdt97TEPzdst9/
mcMrFkQ+oay5LErBxaryz4Kn88A4ImOPTWYdvFh1ObhalYIdp83pipI8sGwm
X7mfUAcqs5onh3x/jhY/ldXkBfWLePbTx4FRBHh2XO3XVhcuimffl9Y5T0DQ
XdJgt5oChBs3U57Vc/DLAX8TY4M2DNm552FRfy+EWCzeF6zMwe5V4Ru3iBDR
7MP4x6TcfnhXMDtOeRcbRTROM1d3EbFaKdagikyFloXa4rc9h/CGwnYHNVo7
aqouzH5FpcETaZ+9D00Hcf+lnevoPR146NQVdXXZAbAe7ZLaQ2Oin0hcjt0A
CVt+f5rx1IkBrG5DZ9O1DMxeN5Za96UTT4V8WnO4RLCO3tmJjxvRcQ6hU9Zg
bjfmMOzX9CsNws1Em4+05H58n8sJ8V3TgweIPXTTmCH4/pirNXlhDz4wur7u
/g4yOq2YaSxOZIP8zPgp/vFE3CT/fHVJDRkHVkXM1FjIhTlfZm0I2F+LV7s4
FQ4uFEz7VjbQN5kHF6/8Vrgf+wKXKPDE4DEFZ+/Y5eV/mQf9N6rLJQ9wsdV1
6vEHBwgwtz8kVFOXAuwACTulRg6ywq6ayq9ugwbG0VE7Wq9gn9TIXzyfg60f
XukwlImQFKX60+F5P5QT95eUbmPjavuiop+T2qGXMdU5opMKP1vlXY4eGsL+
b0rPecR2UPM6sHUmnQYPdJMdrGAQ99lK7b78sQPUdLhsb+kBKFR7//YdmYnt
zR6fGNM6odxs+cqzdgw4TdmjEq3FwLBvfiUmi7rg0qPmtyb5TNihdryoyoCO
h2pudY2qd8PBa3JvZioMQnJECPnejX7MVRuPGfLtAU+5WRHe54Yg0uwms355
D/YuvbIjcyYZzgxHD92nssHgUG2peyQRT3GXin2cRoHU33F2JGku+HyeFWW9
txY7U/0H1U5QQOrxFht5cR4UEQ0UhfGs27ZVVBBPeG7x+k88k0YSCYvDubhd
402+kxMBnvZfT3mRR4Zvn25s2OjNxZgfjBX23gRIYBvetp5EgQ0H7fe/iORi
qcGhm+ObCGjZPrfOooAMP8sm+doJns9XTRnMOELAqqwfK10Fzyes2Lx+fcUN
1A6odVe9ScFZjtfttB/xgDW63HFJQhoOsp33uGZR8Jv2z17xa/8Hh3/4ZckS
c55CL+6dGv6xsbIHJtdz3szWZMPILTJtm2BXapOqUqSlkuF73fC1wIsckGze
PSrs16j6LTVuNqaAniukC/s1ti2n//RrFLbv3R3gS4HPPOKffg3hTnKbWAIX
B7XJl0VWEPDjtkR1uwjy/3X/n2eCT/AJPsEn+ASf4BN8gk/wCT7BJ/gEn+AT
fIJP8Ak+wSf4BJ/gE3yCT/AJPsEn+P8/edMh5zMOem24Q91/y4rXfDw4c0e1
0tpmaJ299/Oy860IBT3r5r/nYw35u6voYDMYvmyrdZ/ShxTbQB+LzVzMvOhc
oxDXBBX5n0MuGLWjgUPHfrYSHz917D92wZQAxpI3fFzM2lDkXqwt0YWPg1/r
V9u+IMD45tygwEWt6KedpzM3kY/y1zh3NdXa4JODe7MMmYql+mfGKnrZuHyG
Y1Z1eysYLTDRuq5CxbBjgeC+kYOma8KOpu8iwG3ejvSNr/twxL5om/cDDqpf
/BJnQyJAZpSyvuJvEhouSTD8rMzDD+c6J52Sbgdl17CPB562ow4FpF6d5WGZ
X9qXAxnt8HoDeYWs4HuGWVg9WvKOhyt3Rc/6rN8B5KMnu75qtOCljplVO2fy
sT922uNVtR0wjxyR5mU0gGkBCeo/Mgfxl/Qb/9n2RKjSsYnsPk5H7abtKK45
hLMf28mdk2iHYzqh5Nt3aHh+9Jvr7NQhvFc2a5VmQTt8aJizqjOHil+ufor6
PZ+N6jd/PY883gGPW9bX3HrZg4c7tOfZRnPQ3uNwyfzGTvi2IpJpr9yFUzZ2
5xl94yClZl/KrWtdoPnV/ryCeQeaPSqzWuzGxcDKlUmH3brBwo9fM766DQtd
M2gH3nKx3927IGdZD6gxTS78qGpC6pLkezxZHgbnf200o/cA8bauhJwkCw/f
r5VY6s5A0vnb72P1SNCYUjrcbMrEGtuXTjp8BhIsHuwZUe8Eg8oFqdN8GPj7
xLuTEgFMXLpqi+J99S4otDFKZwYOYLPm77d5U1mYmxzsoLu2G2JPdpdRvemY
tulE3ZIkFmbPMLgz1bYHrhyWW5fL6MeSA+RZ798NIin6t536bQqM7iJd7+RS
8FjscbvYPUNYHXo2I6ylF1a0ZE2VTOnGvPz2dVuYQzjQ8l1ffbwPOnztt49K
kjB50ajL6EE2JqufuMeTpsJqXGBUOLUNzcXzlYLa2ZjU/nMt6w4V3DgSfpJn
GrD/xy7N8OUcvLTpzOvjc2ggFWneK2POxKtfNtFmn+8EM1BxuklkQMVuiyJ+
0gDmhXTfnWfbBa83qTz/uYwFjkNv7GWThnAxzm3/3NAP/i51X9cWdIPYL9bW
ARc6BgyP72hNGID0o7wXqV408LjJznhYQkXf+NMwewMDjrdKl/fb0GHBeF0Y
zacX9X0WxMbzGdAHXAcbvQEoX+CiVNXJxA9TxX5OucwAelX7TzdHElirbDxQ
Ks/EQzYFZEl5JsxNPh96wawTfBeWn9p5sB9lzmrFbeINglvb4YrHaRTI8e22
IO+koLpBG568OASpa09RWA294DQ/wTJ6XjdqjQYTrkmwQePrs2FLiX4oOmLc
Uh3cgUp9RQyXYDb455t82aZAheCLunMjDQbQ8L5xQ1HeIJwZL68PMySCtueu
I0oX6GgSMSm4b/EQ7H+S+ZTPIcLIpy6qRA4Nuy4basrfHYJkpaHsyQ/aIZY+
Kjc8mYzVrxOqFYI58NLD3vr5s04I6l6fK2XThQk1VNVZXzlA1nxL+OrTBfL1
6w8wozrQ99cqhccuXPB/TDpx07AbluoNM3iRbWj4oPtXbgkXCqIyxudN6oFu
Uim/c38zOkpV9O2bwYMuE8avR3U9QJ+lP6isQMN9Jr21O0rZUG9gvlHhSSt4
JFjNJu2l4pOgG1JvlDlwl6po4aNBgKSn+8k1uv3otPp2iVUoBzon29YmZRDA
7UpotNWtXoxQJtilUzlwqNPrjZROG5gfM2k6dr8TP6lN16maygP1tbpSR3uI
8MD3XbXojQ70l5ILnW/PgyefFhqnnG4Hr8CEugFJIqqGRo91vuDBIoMLEhyx
DrA73xN68mIr1q5UGO4c5cFPHdD3f9ABjiYdZ6knG/Cqp4eRoz4fcmZdMxNf
SgL9152GC1KqsSBTe2PTUT5sepDr+DmHBGtEbQpIBX34Y7uK6ZqFXGjJEknZ
LNcE1dfv0F3denGUJpL27SgXKnT0xj36mmBJ3/oHT6dRcKSv3sWzmAtqh73m
qWY2w6vCHdZ5p3vwk/Wgg4g0DzZmx0874t8CRGuy/8K+Ljw+vg49nHnwXneV
2RuNVnCU02udadSBUo3no8cF359Tc835lQgBPGr2VGXvJ+IsY09tCT0+dKRu
6VzlR4CDe+/XL7QnYH/zmr7kAD48mCk6s4BJgC9X86fNdWjGIxlznbpf8qHi
st9bqlMbPO1mN3Uk1GGejoPZDDYfxPit5gta2mAo1rFSM6UK2wIVWWqzh6Hp
Vso0BX0i0N9Y3FVTRnQ98kbSae0wFN+xrKh+RIQpCdFbeht70N7Tud3Smgd3
xafF1mytBxul6UGkiG6U8bg9iRLHA7X34Q1Rn+thU7TU4xyDLgz7UNkl3cSD
4MnLEm48bIAd2198+vyUhO0jpeHBs/nALtrZEmHUCFueBVoHr+5AblHElUFb
wXh1+xtOHWkE1rrET9ZxRDznMW/LrKt8ULacY73nURPUt47W728j4JEjbXWs
Wj7c0Gq64L6zGXxXklWXz2vFBb3JEtHjfLh+oIWhptACXXYWS0iqjXjbd5FJ
7OphmE5cnk6qbgHd9Wvyp/rVYnV4bZehwzBs5cQYXDFphXZnzqzV3yoxM3+f
nvn5YYgUra4tSmyF6gIHAs0J8ccRKceN94ch/I6yt9iXVjD8338XGGX//i7w
kJbxn/eG6NHVwveGsA5b/7w3tE7ueJYvaxC/boisenqUiifTKtpWTCfDfs5A
yvYrHGTbQOaPy224y05Z3iqqD5Qs5ly/MX8QMzXM9zO+U3HGfLSb6kaBgMwV
9JZuNkqkNNmyjxHRW426ylmTCtqWittPJ7OwdH6Tdf4mGho7Y5jHul74RFGz
oj5h4we7BHntG0TcPDdrXtQJKoyUOcLJRMH+udRZa5RHw6zv62r3vOyDgaSg
uLB3Q7in42uqZnA79sbOf044S4OGJwtCxQoH8aXGgWuTjnfgqtrs+t2P6KBl
8DiVdZCGp0hhdrOiunHlLeMDSsmDkD96vKxyQTdGrT0wbH6WiU8XbQuSXcyA
VvuP++orenGqrxllWnEP7joh93Te9yHYcG1GJXV5O9a9j7wqL8JC9S9PIraP
MODQ4oPtdrc6USNDXdcxj4zPPIzspu/mQCXxhMisUALWX1XcE6HLwoCQso40
WyZEDM7My2rvwG7jmPlfS8i49dI+u95cDvxsL/wh/D16lw3FS4PDWTht4yNT
4e/Rqynmft/3sQm/hsQtMDOgIL0v7vELwfqOaq6pvxxUigOZNjlHgijYanY5
brE3DzbYlhUUprGxM/Cj46FzRLhBy/uw6RQVDsX3Bmk0DWHTr9bJHVvbIShB
+XZwCA0+P/V6PvpqECWqo5CyvwPMPS49YT+mQ8IkCh4hdOCoLCvSp5kMs3zc
V5/N4kB0kf+TQX4TLrc9FW9rQ4FXTTUkaj4XUkRmNwi/z33F7CzB94HulI9/
vo/qxzn0GQ9YGJ9cyGDb0KDgbgxjbFUvnHAbDDR9wEQ6p0zcjkuD1/diIin5
feBv37bV9CYB9Vevk/NXZMH00V/UmkNMaLLL31GiVYP9G0fkW46w4Gtwxye/
Oax/z3P4Z57/35a3T/AJPsEn+ASf4BN8gk/w/2/wguC3s1ifu3HjqbEd5oE8
1HHr+1RTUA/FrwyDTxO6EE3ET6bk8VDv13DpT9MG0Gx+Sre63omMPbs513g8
HErNiiX0NMAP95+HXSxJ+KOCWmSpxsc0ubkqUqcawdBRe939z+3Ytc+kdZoT
H9ndNxx0pzYBJ+HKz1uRRDy/317MO46P8tubms6nNoHq/m01aZFNqH2s3M53
0TC+kN+isvdSC/i7jp1aCvV4xv2SydVNwyhZvcdEfVYrWC6PqT6S9A7fFq65
aXp4GKNVr2lmH2yF0vyIsitdFbjCcsz9ZdQwOr/30xR92QriZYvbq3mlmLis
4Nvzh8OovLvZ1P5XK6z7V705628ebqTSleTtSsafS4YnW/dx8eG0Be87RFtA
MWtv/DfJHrwUbjl8XJWHp3O2rhgpaYFN7n4ng+50oYHr9HKuFw83XjqkaWXQ
CgsrzjVqKnRidvfShPQMHh48rhPpd1dQ/15PSd7r14HX5C9GneHz0LWHbTbz
RyvM/RK2bfL6RnR9YhCysJmPLeJmqubRbYC+i0q959WimiLhG2mMjxE5Hzra
B9tAl3pUSr26Emd4m85ePH8YJxUp1idvIcKcCodxv/QyXLXdLY6+bhh9F0S+
E00hAvtA4NLAtQXIOtTuR9gyjKlPS5JCvhMh9tbFBmPdXrTeLLI76QsHDY66
8zJ2tcHuukfSho/I+OHEptQKKy6eOXhN+1RjG8zYs8jj7YigDtVT+W32UMB9
mtc7bSLC+26TBbHyXWjPDRXN+sRFg4YAnYvVRBC9ntyRYVaP8dHWtLJNfKxC
qxPJm0gwtTtCxHxNNVovmPOUeIKPNx8+TsstIEF/4BLTPQ2IWy+cIL2K56Oj
luuxnxqdECZpOyv4fD6y91QsW53Cx4WTChISb3XC9bmDB6uT+rGJ5OPDucjG
uUaLn1crk+DhBZn6l+96sVBWq/rOezZWtKwm1JaT4JbkeMbvAjKmTCV/b3Lm
4BL/ulizY51g5/ijof9WjeDzczOmWvFw7LtzyFgIGaamYX7b2nJ8veympeRJ
HnKkE6ydJlHg46NIF/r1fFyhftS5NYKHHtf3XRi7RoFPO2Svqh+h4dLdTWen
qAziVL9NR+NNybAqXGRl/g4qzggvmvImdRC7vmj+SF9NgasD0196xVWijNy4
z4F9HEzab+VYcooGC8/f1X+6tRAf+S9rL/fnYGB2+d6QGho89b9eIXxv9OWi
48+F743K9x7YKXxvdP91bdnDMUNYYbLyLvVJO/iqiyfVvqWBnUXk89Xxg+jj
aR6leq0DEl2MHHa/o0NIXpRukVU7dizZFiw2SoZQzw8zGCMcaLnGTbg5uxGX
7Yu/s9mZAu2ft/IyW7lw3Hj7lWhBvdy+cHahsF4+Vqp2W1gvHzihxRJ6S3q3
93wUeks8gweKhd6SlX0yH4wNBvGWyZmcNzQqbO/7mL7CkAJzMioYX51ZWFwy
q+vSeRo8O2mmeiayFy4a3btqEMjEelUtNz8ROpi8+T14l9kHCmGKRwsedaNx
6ZrfYseZYPTdi3ZTjAGF4gUjxxw70MWgKTmvjwmSvBkfXWsY8KHHST+X24rO
8xMck9RYwOcv36BxngmPptneKxbU46ZplxSE9bhY3Lofwnrcx7Lkm9BDQj8R
+jX4IRM0N6zLE3pI+BVcdoLnAB54fGPV9vksUPHprc9Z0w3+KVc/bThFxxiR
hPKDT1gwj1J033VxDzgntZUeOEHDthldnf1qg2B1kDvydTEZdORib9Q5U3FK
tfm2oUeDwMqoX7VgKQV+s3Ofb/tGwHlL5Z4PdbNBU8m4jXmTCnt09EikI42Y
tfFjV5YqB5hnei1Cpgrmwzn6h4vqVZjGtVAzt+fAYnc14+enabCRJLbPfPUr
TLRenEI5ygElkX0Bac00EB9vdxH6SdZsa0wW+kmcv/YtFPpJuudKNae96cct
b9UOG0WwQT5XagGIkYA2j+dBbOjFi57Xrj//yIbpcrU6t3JJYOF0t3NnDRmt
ol/Hf3HkgKVvveI0t07QyOgqbdtdi6XX2lqOmfMg12tVm5c3GS579MybcbMc
3a2Xftp+kgemrOVNcYL5VXOz9XbDqgIk8UOOdETyoL1enV11kQKRD9uWC70l
F2zapgq9JXe2Sb4Qeks2Pqrf/1GiB5V8G7eN3eeCDNnoQroBETYuXVOaLNeF
Uxcscqr4wgWtR4+ndpYQYZVtjZzk9rc443YlP/YKH14dOh6po94JA9LTcm8W
5WPvvDcNoyl8cDvo+SbhaicEpPfNE/pMyIEXwoU+k/FFR6qEPpPN32v0IwX7
c3gFb03YMA/q+8PiKj63wrWy21onDxVgxo1fnFCLYVi0mO49VaQdgr8cl7KJ
I+K9wHZz4f3qRcmzZsL71RN/ffKT/vrkb//1ySeMHusW9j3bfdh6wr5n4945
h4V9T++j3Tt20XrRZZFF4G0bLor6P/vcldIEQ3896nb/8qh3bVhPHhd8/rWf
NamNB/loX3z5QvtrAqjUeDoK+55ZTK/1wr5nhPyKR8K+59LFx7+75VHxzZKw
WK9PbPRiP7x360MrDBFNtd9IUfGD10ObOEsOlvn6yYkc+O/7nr7/8o3v/+sb
r7bef3yOajt6hTJMhmJ4WBcYOhJc0w6b75/e3jhOwBTFH86JzTy8fLRsQb5V
B9jLEqKEfc96g/c1wr6n7K616cK+p1QCISvnMx2tt2u8W0QeRC/WrsbdV4hw
wCevWNuYjuaBQV9fbB7C+575umYa7bCYeWxOxHkaHruYfakvdwhlXMuv+ta2
w/u/fc/Rf/U9g/4bj3eYfEzB2mWdGBBnG7x9ERfHRB8dPdzZBeOyd3iXHraj
vsfzXz1nuNi7Y+k0rdhuEH3ZdSuWSMDOfdYa7+u5OPmIwealRj3wYCpBQdj3
fHbyW5Kw7xmwKqBT2PfMPWRS/PM5E5c7R28gpDDwUfQ6/aWpJFhs0KrXP8rA
zwoXsGsxEwfM3o55B3SCA/lY8ogOA+95NsynPmCi5ZevRfH7u+CE+IGfdc4D
WEkZ2nt1PgurYpJ3vt/53/c90//6tIv++rRL/vq0v/EXHplxgoyTyRqqS5KG
MG5j+mSmTR84uScuCgnowh54PG+OHBsjvR/gOft+CDB53HZZtQOjl07bFhvK
xkLJ0PQbK6ng2nUv+8pNAkbvv7nuUT8bJa0UBz88pcJFNWuOxJkGFF9DXyXs
e76o3Fkh7HvqhLwsEd7bLzd2LBbe2x+1F0Phvf2xeNtgn/WDqHVNG8aGqFgd
rrr09HoKZFVERnh4sDBqdvZN6WOCc/WMVLTe9V4wfn9F6VAAE6PmXyidJEbH
fPmAIQNGH1wPdfBdntGNsyznUNw8mLjIwC25ayoDxiA36rp9B0bmZ54/Smfi
S9HpJ1ZWMUDc8E1vX2crHt+l3x5uwsIz+2J8lngwgc3dtVl4v00g7dYU3m/7
XmZaCe+37S7pVwn7ES5BhrrCfsRWFf3Zwn6E9+LeQO5jwTm9q8a4y7cNX2qm
HX4piGeT1f/T3rlGQ5nHcXydyBCGlN21ZVNJZJtFhVS/LlpZ2Uy1LE1XrFRW
OxLZbXejXIqK1EoXWlvYzSJ3yi+FcguDMoO5GMaYW6mNQbQzHbsv7JmXe86+
eN5+zvPqOc95vuf7fP/n8xzXstYSIdt8MObowlZMblYL9hRyoL/C07Qim4eD
GHno/l4mRrD8G1+E9AOLNOK+SJ2D7vMfdmzaxcKN44W65DwhHDurLZ9uwsIB
csAapdfCapPJZqXXwsRFO/dhVh/+euCr4dGsXqg2yqxVS3kKq99mcutGe1Gd
dpn1y4I+mFhb9vmZ/c/giyle3NuTXtyLxk0XteidWEi9b/lbphBKWBqRJVaK
+3nvkwnt9A7M3pfl2WQ4AAUTS++ftuVAsYrdttMibmjoVQ/SPybn63X3Q23j
/tm5Ua2QaB+ok+jSg+WnD259u04IR4NK07rmtIGAJM2ensDDCc9ACTlLCFU5
JYPmxW0qvbL+B2IjuUueoWNt+eKZC8TwqcmWzUFVHeA6VkrZV9mG/W6mPr0h
YnikYdZKOcYE/qzhzbsMGegeXpPWU6O43jjQIUWR188md1vvyd2WNbnbbqe6
JukUcnH7ikO/xypykKzWEu0raQY/tZkla2dxcYkT62PNjSLQ32EZIKa1wKZz
BfrUBjaqFxtQyi6L4KaQE8x/0gL29Ijob7/sxsRDgcteykSwhp73hreR8Y/H
tXCKx3VdZ/ZoyHLF+/OS4zLNWAl4cf7QlWMbXLWpHz2lz8DgqzMmfmuQgOzK
iA9jfTtYvHbeMZzUhJYvB1JI2lJYWz5EZz5ohxTa1lBSdh2Gi3UbDdZLoZKU
pJbu8BTsVey2G+3LP7Nhd2OojZE2lSqGYS9zksbPjVDR0j2akt+FVnPU+54m
icHVwOD8w01PwJPhN/tscCe6vTDbE8cUAx2ZUeFjT4DyxrHshC4LtdrZf5yc
r8hN22u/rM5pgpQ0h7rSzA7kTeyuHvGVgG/vB7R1dqo9q9W515a+Mmbg3WnT
fqrbK4Vhjzt7f8AWkBZIjx62bUaWBiaGXJaCnF/tem4BA67fueC1JqYBG661
kZ1rpaC5qGsGVdGbjDPEoUlujzE068ixktdSuBvHmx4vZoDhOs3ce+MPcZpl
st3ghzLIICeHlzu3QqeK3faqW4y8aIKJW/nUx6JQCYQ4HQy7XVwHqf4JL9+w
O7BavNrQOkcCK+LuJJe41sOSwozYLTeeYY/P7PtHBiRw3LpP52ZnPZDk3Xfj
FX3Zv+Huq5KFUsi123Bt28EGaIyJNLsw1oY1gutzp3lJwfvz06nlGqq9qZQf
zDJMY5rxq6Qw4+syKejX+NvJRU8g7MYXFd2pjbgnZs6evrkyKBSOO9KimyBV
eMrew6UO9cdPtTKdZBA092eym2Ez+LCjR7wra1Bnnznngr8MKpm3thj6NcOd
gWYDEv8BbqfZoX20DLoFsD9O0aPTA1eHx1tWYFLZr+706zJoL6AF73qvZWqP
hr97dGJ6yzz7ZCHGeHq4L87loKVbpEmOlKnSb6bqPwX9pmXtbA8+bqjSXB6q
x0f6ZvlA/nMu7J7i4SdPevhVecwcCqwSTE5zsWixaDvXuhddBMYxERE9MFuF
f2yqZ8xi0jNm4uRc5MUpxfqVpjSj7wVYxlhIao0V/MtXHzXpq1fl16pUcc5n
xY8OQY8ShOhxIn/OzVoOXDE2a+sXMFV6rlR549sH4w9b0vjYEfGjkY4GH8LT
WexVf3Lh8phuoU0sF48sjS1vtO0FE/Zww8oTqs8F1VmL3T3kpTjr8DcypwAB
OOtY1BpdFUDemZBLSh9U8EsSR+mDkuyg2Sh9UBZGzGMvooToq6F1r6lC8Vzz
c/TcK3jwiEra/fpcP867lMorS2zHs9tmVFkoeqh56HkXq21tSGEnPL/yoBPn
936tmzQmAr+0i+fVjRuw89ORnY7OXfjB69Gq4+1ioOq9966HfpRXVKzckf12
3ruk7KHRi3jvcpn1nTVF6Rfta+x9l8sDLkVRPukiHKSNk274MWD41pC7N5UN
I9uEYagpwq1vZ4YZUloh7/03ldkCDhhQbmVG/s5Dkly6M4XOhKErzFl6wf0w
euFk0BE5G60XBci48SyoT/ssTp4hhChe922lH6lyVcBOpR9pZVfNK6Uf6f/2
3Y/gBCc4wQlOcIITnOAEJzjBCU5wghOc4AQnOMH/a/4Xw2bLuw==
     "]], {}},
  Axes->True,
  AxesLabel->{None, None, None},
  AxesOrigin->{Automatic, Automatic, Automatic},
  BoxRatios->{1, 1, 0.4},
  DisplayFunction->Identity,
  FaceGrids->None,
  FaceGridsStyle->Automatic,
  ImageSize->{434.0514156653712, 320.9382211569101},
  ImageSizeRaw->Automatic,
  Method->{"DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> 
    "Globe"},
  PlotRange->{All, All, All},
  PlotRangePadding->{Automatic, Automatic, Automatic},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-2.313428072972384, -1.7412252693305053`, 1.751052572776799},
  ViewVertical->{0.41345819375575377`, 0.31119353274479955`, 
   0.855693231943575}]], "Output",
 CellChangeTimes->{{3.809429160488835*^9, 3.809429248591282*^9}, 
   3.8094317967256413`*^9, 3.81399768843137*^9},
 CellLabel->"Out[6]=",ExpressionUUID->"a076f162-271e-4c16-80a7-c8b16945eac1"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8094293268567123`*^9, 
  3.809429330196789*^9}},ExpressionUUID->"59aa324f-c1fd-44f5-acf0-\
2eb45318bb53"],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", 
    RowBox[{
    "\[Kappa]x", " ", ",", "L", " ", ",", "W", ",", "d", ",", "S", ",", 
     "\[Theta]", ",", "surface", ",", " ", "normal"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"surface", "[", 
      RowBox[{"x_", ",", "y_"}], "]"}], "=", " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", " ", "y", " ", ",", 
       RowBox[{
        FractionBox["1", 
         RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]], 
        SuperscriptBox["L", "2"], " ", 
        SuperscriptBox[
         RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", 
           RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
          FractionBox[
           RowBox[{"d", " ", 
            RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
          FractionBox[
           RowBox[{"d", " ", "S", " ", 
            SuperscriptBox["y", "2"], " ", 
            RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
           RowBox[{"L", " ", 
            SuperscriptBox["W", "2"]}]], "+", 
          FractionBox[
           RowBox[{"d", " ", "\[Kappa]x", " ", 
            RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
          FractionBox[
           RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
            RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
            RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
           SuperscriptBox["L", "2"]], "-", 
          RowBox[{"\[Sqrt]", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", 
              FractionBox[
               RowBox[{"4", " ", "d", " ", "\[Kappa]x", " ", 
                SuperscriptBox[
                 RowBox[{"Sin", "[", "\[Theta]", "]"}], "2"], " ", 
                RowBox[{"(", 
                 RowBox[{
                  FractionBox[
                   RowBox[{"4", " ", "d", " ", 
                    SuperscriptBox["y", "2"]}], 
                   SuperscriptBox["W", "2"]], "+", 
                  FractionBox[
                   RowBox[{"d", " ", "S", " ", 
                    SuperscriptBox["y", "2"]}], 
                   SuperscriptBox["W", "2"]], "-", 
                  FractionBox[
                   RowBox[{"d", " ", "x", " ", 
                    RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "-", 
                  FractionBox[
                   RowBox[{"d", " ", "S", " ", "x", " ", 
                    SuperscriptBox["y", "2"], " ", 
                    RowBox[{"Cos", "[", "\[Theta]", "]"}]}], 
                   RowBox[{"L", " ", 
                    SuperscriptBox["W", "2"]}]], "-", 
                  FractionBox[
                   RowBox[{"d", " ", "x", " ", "\[Kappa]x", " ", 
                    RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "L"], "+", 
                  FractionBox[
                   RowBox[{"d", " ", 
                    SuperscriptBox["x", "2"], " ", "\[Kappa]x", " ", 
                    SuperscriptBox[
                    RowBox[{"Cos", "[", "\[Theta]", "]"}], "2"]}], 
                   SuperscriptBox["L", "2"]], "-", 
                  RowBox[{"x", " ", 
                   RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}], ")"}]}], 
               SuperscriptBox["L", "2"]]}], "+", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{
                RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
                FractionBox[
                 RowBox[{"d", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
                FractionBox[
                 RowBox[{"d", " ", "S", " ", 
                  SuperscriptBox["y", "2"], " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                 RowBox[{"L", " ", 
                  SuperscriptBox["W", "2"]}]], "-", 
                FractionBox[
                 RowBox[{"d", " ", "\[Kappa]x", " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
                FractionBox[
                 RowBox[{"2", " ", "d", " ", "x", " ", "\[Kappa]x", " ", 
                  RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", 
                  RowBox[{"Sin", "[", "\[Theta]", "]"}]}], 
                 SuperscriptBox["L", "2"]]}], ")"}], "2"]}], ")"}]}]}], 
         ")"}]}]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"normal", "[", 
     RowBox[{"x_", ",", "y_"}], "]"}], " ", ":=", 
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Cross", "[", " ", 
         RowBox[{
          RowBox[{"D", "[", 
           RowBox[{
            RowBox[{"surface", "[", 
             RowBox[{"u", ",", "v"}], "]"}], ",", "u"}], "]"}], ",", 
          RowBox[{"D", "[", 
           RowBox[{
            RowBox[{"surface", "[", 
             RowBox[{"u", ",", "v"}], "]"}], ",", "v"}], "]"}]}], "]"}], "//",
         "Normalize"}], ")"}], "/.", 
      RowBox[{"u", "\[Rule]", "x"}]}], "/.", 
     RowBox[{"v", "\[Rule]", "y"}]}]}]}]}]], "Input",
 CellChangeTimes->{{3.8094293014760027`*^9, 3.8094293779002647`*^9}, {
   3.809429449508082*^9, 3.8094294498282266`*^9}, {3.809429485724907*^9, 
   3.809429515193378*^9}, {3.809429802979007*^9, 3.8094298262412424`*^9}, {
   3.8094306591686063`*^9, 3.8094307004839015`*^9}, {3.8094309575417128`*^9, 
   3.809430976581159*^9}, 3.809431054952131*^9},
 CellLabel->"In[11]:=",ExpressionUUID->"3e304c2d-b2cd-4fdc-a082-11ae581761b1"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"\[Kappa]x", " ", "=", " ", "0.5"}], ";", " ", 
   RowBox[{"S", " ", "=", "12"}], ";", " ", 
   RowBox[{"L", " ", "=", " ", "1"}], ";", " ", 
   RowBox[{"W", " ", "=", " ", 
    RowBox[{"0.75", " ", "d"}]}], ";"}], " "}]], "Input",
 CellChangeTimes->{{3.8094307067922163`*^9, 
  3.809430746651762*^9}},ExpressionUUID->"94796862-b78d-427e-820a-\
322b962a8954"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"v1", " ", "=", " ", 
    RowBox[{"surface", "[", 
     RowBox[{"0", ",", "0"}], "]"}]}], ";", " ", 
   RowBox[{"v2", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"L", ",", " ", "0", ",", " ", "d"}], "}"}]}], ";", " ", 
   RowBox[{"v3", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"L", ",", " ", 
      FractionBox["W", "2"], ",", " ", "0"}], "}"}]}], ";", " ", 
   RowBox[{"v4", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"\[Delta]", ",", " ", 
      FractionBox["W", "8"], ",", " ", 
      FractionBox["d", "4"]}], "}"}]}], ";"}], " "}]], "Input",
 CellChangeTimes->{{3.8094308607493286`*^9, 
  3.8094308632965946`*^9}},ExpressionUUID->"8a7ce649-2fca-4afb-b626-\
459ad20e55fb"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8094308522541485`*^9, 
  3.8094308557642665`*^9}},ExpressionUUID->"d357c987-74ca-4f54-ad8b-\
293582b0b530"],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.809430884554657*^9, 
  3.8094309499860926`*^9}},ExpressionUUID->"27c9bc83-4889-4d17-b655-\
b7bd2c9b3801"],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{{3.809430866619632*^9, 3.809430946777085*^9}},
 CellLabel->
  "Out[140]=",ExpressionUUID->"37e96ed4-9c68-4469-b232-b4c5f2b27ffe"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"form", "[", 
  RowBox[{"x", ",", "y"}], "]"}]], "Input",
 CellChangeTimes->{{3.809430996778145*^9, 3.809430999584737*^9}},
 CellLabel->
  "In[149]:=",ExpressionUUID->"27e8de7f-90ae-4ff0-81d5-e4787da2c688"],

Cell[BoxData[
 RowBox[{"d", " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{"4", "+", 
         RowBox[{"S", " ", 
          RowBox[{"(", 
           RowBox[{"1", "-", 
            FractionBox["x", "L"]}], ")"}]}]}], ")"}], " ", 
       SuperscriptBox["y", "2"]}], 
      SuperscriptBox["W", "2"]]}], "-", 
    FractionBox[
     RowBox[{
      SuperscriptBox["x", "2"], " ", "\[Kappa]x"}], 
     SuperscriptBox["L", "2"]], "+", 
    FractionBox[
     RowBox[{"x", " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Kappa]x"}], ")"}]}], "L"]}], ")"}]}]], "Output",
 CellChangeTimes->{{3.809430866619632*^9, 3.8094309467810984`*^9}, 
   3.809430999790163*^9},
 CellLabel->
  "Out[149]=",ExpressionUUID->"7c65e25f-24df-422c-bba9-ea8dacaf6f5c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"surface", "[", 
  RowBox[{"0", ",", "0"}], "]"}]], "Input",
 CellLabel->
  "In[154]:=",ExpressionUUID->"64b5117e-19be-49e0-b74a-a3342b4feba1"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "0", ",", 
   FractionBox[
    RowBox[{
     SuperscriptBox["L", "2"], " ", 
     SuperscriptBox[
      RowBox[{"Csc", "[", "\[Theta]", "]"}], "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", 
        RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "+", 
       FractionBox[
        RowBox[{"d", " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "+", 
       FractionBox[
        RowBox[{"d", " ", "\[Kappa]x", " ", 
         RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
       SqrtBox[
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{"Cos", "[", "\[Theta]", "]"}], "-", 
           FractionBox[
            RowBox[{"d", " ", 
             RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"], "-", 
           FractionBox[
            RowBox[{"d", " ", "\[Kappa]x", " ", 
             RowBox[{"Sin", "[", "\[Theta]", "]"}]}], "L"]}], ")"}], "2"]]}], 
      ")"}]}], 
    RowBox[{"2", " ", "d", " ", "\[Kappa]x"}]]}], "}"}]], "Output",
 CellChangeTimes->{{3.8094310359364395`*^9, 3.809431058260599*^9}},
 CellLabel->
  "Out[154]=",ExpressionUUID->"3d673af5-af4f-43f3-87c8-d68df212a318"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"L", " ", "=", " ", "3"}], ";", " ", 
  RowBox[{"W", " ", "=", " ", "2"}], ";", " ", 
  RowBox[{"d", " ", "=", " ", "2"}], ";", 
  RowBox[{"\[Alpha]", " ", "=", " ", "0.5"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"v0", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ";", " ", 
  RowBox[{"v1", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", " ", "0", ",", " ", "d"}], "}"}]}], ";", " ", 
  RowBox[{"v2", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", " ", 
     FractionBox["W", "2"], ",", " ", 
     RowBox[{"\[Alpha]", " ", "d"}]}], "}"}]}], ";", 
  RowBox[{"v3", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", " ", 
     RowBox[{"-", 
      FractionBox["W", "2"]}], ",", " ", 
     RowBox[{"\[Alpha]", " ", "d"}]}], "}"}]}], ";", " ", 
  RowBox[{"v4", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", "0", ",", "0"}], "}"}]}], ";", 
  RowBox[{"v5", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", " ", 
     FractionBox["W", "2"], ",", "0"}], "}"}]}], ";", " ", 
  RowBox[{"v6", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"L", ",", " ", 
     FractionBox[
      RowBox[{"-", "W"}], "2"], ",", "0"}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Graphics3D", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Thickness", "[", "0.007", "]"}], ",", 
     RowBox[{"Line", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"v0", ",", " ", "v1"}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"v0", ",", "v3"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"v2", ",", "v3"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"v1", ",", "v2"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"v1", ",", "v3"}], "}"}]}], "}"}], "]"}], ",", "Dashed", ",", 
     RowBox[{"Line", "[", 
      RowBox[{"{", 
       RowBox[{"v0", ",", "v2"}], "}"}], "]"}], 
     RowBox[{"(*", 
      RowBox[{",", 
       RowBox[{"Dashing", "[", "None", "]"}], ",", 
       RowBox[{"Thickness", "[", "0.004", "]"}], ",", "Blue", ",", 
       RowBox[{"Line", "[", 
        RowBox[{"{", 
         RowBox[{"v1", ",", " ", "v4"}], "}"}], "]"}]}], "*)"}], ",", 
     RowBox[{"Opacity", "[", "0.5", "]"}], ",", "Gray", ",", " ", 
     RowBox[{"Triangle", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"v0", ",", "v1", ",", "v2"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"v0", ",", "v1", ",", "v3"}], "}"}], 
        RowBox[{"(*", 
         RowBox[{",", 
          RowBox[{"{", 
           RowBox[{"v0", ",", "v2", ",", "v3"}], "}"}]}], "*)"}], ",", 
        RowBox[{"{", 
         RowBox[{"v1", ",", " ", "v2", ",", "v3"}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"v0", ",", "v5", ",", " ", "v6"}], " ", "}"}]}], "}"}], 
      "]"}]}], "}"}], ",", " ", 
   RowBox[{"Boxed", "\[Rule]", "False"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.8097616949212265`*^9, 3.8097619132669506`*^9}, {
   3.809763370700025*^9, 3.8097637365498967`*^9}, {3.809763855508873*^9, 
   3.8097639503523865`*^9}, {3.8097639984567633`*^9, 3.809764093821803*^9}, {
   3.809764158390128*^9, 3.809764161709253*^9}, 3.809764231907578*^9, 
   3.809764282003106*^9},
 CellLabel->"In[99]:=",ExpressionUUID->"822e9191-3742-4052-8a93-04e4838eb209"],

Cell[BoxData[
 Graphics3DBox[
  {Thickness[0.007], 
   Line3DBox[{{{0, 0, 0}, {3, 0, 
     2}}, {{0, 0, 0}, {3, -1, 1.}}, {{3, 1, 1.}, {3, -1, 1.}}, {{3, 0, 2}, {
      3, 1, 1.}}, {{3, 0, 2}, {3, -1, 1.}}}], 
   {Dashing[{Small, Small}], Line3DBox[{{0, 0, 0}, {3, 1, 1.}}], 
    {GrayLevel[0.5], Opacity[0.5], 
     TagBox[
      Polygon3DBox[{{{0, 0, 0}, {3, 0, 2}, {3, 1, 1.}}, {{0, 0, 0}, {3, 0, 
         2}, {3, -1, 1.}}, {{3, 0, 2}, {3, 1, 1.}, {3, -1, 1.}}, {{0, 0, 0}, {
        3, 1, 0}, {3, -1, 0}}}],
      "Triangle"]}}},
  Boxed->False,
  ImageSize->{386.75813064350194`, 260.8313678983362},
  ImageSizeRaw->Automatic,
  ViewPoint->{1.2567718183640129`, -3.0815492439740515`, 0.6120284744429518},
  ViewVertical->{0.16919294763309603`, -0.3635464206462598, 
   0.9160828273177689}]], "Output",
 CellChangeTimes->{{3.8097633907314434`*^9, 3.809763491259999*^9}, 
   3.8097635387338223`*^9, {3.809763579053015*^9, 3.809763637678239*^9}, {
   3.809763693157919*^9, 3.8097637372141194`*^9}, {3.8097638658812485`*^9, 
   3.8097638955090513`*^9}, {3.809763942111453*^9, 3.8097639506555986`*^9}, {
   3.809764001231372*^9, 3.8097640263821187`*^9}, 3.8097640944491177`*^9, 
   3.8097641623515635`*^9, 3.80976424778762*^9, 3.8097642829206753`*^9},
 CellLabel->
  "Out[101]=",ExpressionUUID->"a497c204-fe61-4125-8d77-6af3c9506e58"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"th", " ", "=", " ", "0.003"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetOptions", "[", 
     RowBox[{"Plot", ",", 
      RowBox[{"LabelStyle", "->", 
       RowBox[{"Directive", "[", 
        RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",",
       " ", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", 
         RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetOptions", "[", 
     RowBox[{"ListPlot", ",", 
      RowBox[{"LabelStyle", "->", 
       RowBox[{"Directive", "[", 
        RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",",
       " ", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", 
         RowBox[{"PointSize", "[", "th", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetOptions", "[", 
     RowBox[{"ListLogPlot", ",", 
      RowBox[{"LabelStyle", "->", 
       RowBox[{"Directive", "[", 
        RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",",
       " ", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", 
         RowBox[{"PointSize", "[", "th", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetOptions", "[", 
     RowBox[{"ListLinePlot", ",", 
      RowBox[{"LabelStyle", "->", 
       RowBox[{"Directive", "[", 
        RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",",
       " ", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", 
         RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetOptions", "[", 
     RowBox[{"ParametricPlot", ",", 
      RowBox[{"LabelStyle", "->", 
       RowBox[{"Directive", "[", 
        RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",",
       " ", 
      RowBox[{"PlotStyle", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", 
         RowBox[{"Thickness", "[", "th", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.809501199011744*^9, 3.8095011991533656`*^9}},
 CellLabel->"In[2]:=",ExpressionUUID->"c556707d-be97-44da-924b-453e1ed4b465"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"v1", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ";", " ", 
   RowBox[{"v2", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"L", ",", " ", "0", ",", " ", "d"}], "}"}]}], ";", " ", 
   RowBox[{"v3", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"L", ",", " ", 
      FractionBox["W", "2"], ",", " ", 
      RowBox[{"\[Alpha]", " ", "d"}]}], "}"}]}], ";", " ", 
   RowBox[{"v4", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"L", 
       RowBox[{"(", 
        RowBox[{"1", "-", "\[Delta]"}], ")"}]}], ",", " ", 
      FractionBox["W", "8"], ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"\[Alpha]", " ", "+", " ", 
         FractionBox[
          RowBox[{"1", " ", "-", " ", "\[Alpha]"}], "2"]}], ")"}], "d"}]}], 
     "}"}]}], ";"}], " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"nhat", " ", "=", 
    RowBox[{"Normalize", "[", " ", 
     RowBox[{"Cross", "[", 
      RowBox[{
       RowBox[{"v2", " ", "-", " ", "v1"}], ",", " ", 
       RowBox[{"v3", " ", "-", " ", "v1"}]}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"outArm", " ", "=", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"Norm", "[", " ", 
      RowBox[{"Cross", "[", 
       RowBox[{"nhat", ",", " ", 
        RowBox[{"v4", " ", "-", " ", "v2"}]}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"L", ">", "0"}], ",", " ", 
       RowBox[{"W", ">", "0"}], ",", 
       RowBox[{"d", ">", "0"}], ",", 
       RowBox[{"\[Delta]", ">", "0"}]}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"inArm", " ", "=", " ", 
   RowBox[{"Sqrt", "[", 
    RowBox[{
     SuperscriptBox["d", "2"], " ", "+", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       FractionBox["W", "2"], ")"}], "2"]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   FractionBox["inArm", "outArm"], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"L", ">", "0"}], ",", " ", 
     RowBox[{"W", ">", "0"}], ",", 
     RowBox[{"d", ">", "0"}]}], "}"}]}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.809247044932747*^9, 3.8092471367065077`*^9}, {
  3.8092471706287785`*^9, 3.809247211417715*^9}, {3.809247255395127*^9, 
  3.8092472922127223`*^9}, {3.8092474721057014`*^9, 3.8092475664125175`*^9}, {
  3.8092477224453397`*^9, 3.8092477326091366`*^9}, {3.809250217176115*^9, 
  3.809250262534318*^9}, {3.8092515823037043`*^9, 3.809251588135874*^9}, {
  3.8092522187229586`*^9, 3.809252223191035*^9}, {3.809252279512992*^9, 
  3.8092522842015514`*^9}, {3.809415225712676*^9, 3.809415254721513*^9}, {
  3.8094425785382853`*^9, 3.809442582416746*^9}, {3.809442634606236*^9, 
  3.809442639287801*^9}, {3.8094426758033*^9, 3.8094426843862495`*^9}, {
  3.8094452286776667`*^9, 3.8094452296166067`*^9}, {3.8094453586468244`*^9, 
  3.8094453634553967`*^9}, {3.8095010171200924`*^9, 3.8095010201111155`*^9}, {
  3.809501063535014*^9, 3.8095010802951937`*^9}, {3.8095011845274725`*^9, 
  3.809501212510684*^9}},
 CellLabel->"In[8]:=",ExpressionUUID->"984bdb3d-e10e-4e3c-983e-52d68c199bad"],

Cell[BoxData[
 RowBox[{"4", " ", 
  SqrtBox[
   FractionBox[
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"4", " ", 
        SuperscriptBox["d", "2"]}], "+", 
       SuperscriptBox["W", "2"]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"Abs", "[", 
         RowBox[{"d", " ", "W"}], "]"}], "2"], "+", 
       RowBox[{
        SuperscriptBox["L", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["W", "2"], "+", 
          RowBox[{"4", " ", 
           SuperscriptBox["d", "2"], " ", 
           SuperscriptBox[
            RowBox[{"Abs", "[", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "\[Alpha]"}], "]"}], "2"]}]}], 
         ")"}]}]}], ")"}]}], 
    RowBox[{
     RowBox[{
      SuperscriptBox["L", "2"], " ", 
      SuperscriptBox[
       RowBox[{"Abs", "[", 
        RowBox[{
         SuperscriptBox["W", "2"], "+", 
         RowBox[{"8", " ", 
          SuperscriptBox["d", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], "2"]}]}], "]"}], 
       "2"]}], "+", 
     RowBox[{"16", " ", 
      SuperscriptBox["W", "2"], " ", 
      SuperscriptBox[
       RowBox[{"Abs", "[", 
        RowBox[{
         RowBox[{
          SuperscriptBox["d", "2"], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}]}], "-", 
         RowBox[{"2", " ", 
          SuperscriptBox["L", "2"], " ", "\[Delta]"}]}], "]"}], "2"]}], "+", 
     RowBox[{
      SuperscriptBox["d", "2"], " ", 
      SuperscriptBox[
       RowBox[{"Abs", "[", 
        RowBox[{
         SuperscriptBox["W", "2"], "+", 
         RowBox[{"16", " ", 
          SuperscriptBox["L", "2"], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", "\[Delta]"}]}],
         "]"}], "2"]}]}]]]}]], "Output",
 CellChangeTimes->{3.8094453686426926`*^9, 3.8095011052155395`*^9, 
  3.809501230431731*^9, 3.8095918254160414`*^9, 3.813997866427142*^9},
 CellLabel->"Out[13]=",ExpressionUUID->"ea32ddb2-6536-4dc1-a200-25d098b068e8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Clear", "[", 
  RowBox[{"\[Alpha]", ",", "\[Delta]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"L", " ", "=", " ", "1"}], ";", " ", 
   RowBox[{"W", " ", "=", " ", 
    RowBox[{"0.5", " ", "d"}]}], ";", 
   RowBox[{"(*", " ", 
    RowBox[{
     RowBox[{"\[Delta]", " ", "=", " ", "0.2"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"MAfunction", "[", 
     RowBox[{"d_", ",", " ", "\[Alpha]_", ",", "\[Delta]_"}], "]"}], "=", " ", 
    RowBox[{"4", " ", 
     SqrtBox[
      FractionBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"4", " ", 
           SuperscriptBox["d", "2"]}], "+", 
          SuperscriptBox["W", "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox[
           RowBox[{"Abs", "[", 
            RowBox[{"d", " ", "W"}], "]"}], "2"], "+", 
          RowBox[{
           SuperscriptBox["L", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["W", "2"], "+", 
             RowBox[{"4", " ", 
              SuperscriptBox["d", "2"], " ", 
              SuperscriptBox[
               RowBox[{"Abs", "[", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]"}], "]"}], "2"]}]}], 
            ")"}]}]}], ")"}]}], 
       RowBox[{
        RowBox[{
         SuperscriptBox["L", "2"], " ", 
         SuperscriptBox[
          RowBox[{"Abs", "[", 
           RowBox[{
            SuperscriptBox["W", "2"], "+", 
            RowBox[{"8", " ", 
             SuperscriptBox["d", "2"], " ", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], "2"]}]}], "]"}],
           "2"]}], "+", 
        RowBox[{"16", " ", 
         SuperscriptBox["W", "2"], " ", 
         SuperscriptBox[
          RowBox[{"Abs", "[", 
           RowBox[{
            RowBox[{
             SuperscriptBox["d", "2"], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}]}], "-", 
            RowBox[{"2", " ", 
             SuperscriptBox["L", "2"], " ", "\[Delta]"}]}], "]"}], "2"]}], 
        "+", 
        RowBox[{
         SuperscriptBox["d", "2"], " ", 
         SuperscriptBox[
          RowBox[{"Abs", "[", 
           RowBox[{
            SuperscriptBox["W", "2"], "+", 
            RowBox[{"16", " ", 
             SuperscriptBox["L", "2"], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", 
             "\[Delta]"}]}], "]"}], "2"]}]}]]]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{
     FractionBox[
      RowBox[{"MAfunction", "[", 
       RowBox[{"d", ",", "\[Alpha]", ",", "\[Delta]"}], "]"}], 
      RowBox[{"MAfunction", "[", 
       RowBox[{"100", ",", "\[Alpha]", ",", "\[Delta]"}], "]"}]], ",", " ", 
     RowBox[{"{", 
      RowBox[{"d", ",", "0", ",", "5"}], "}"}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{"Bold", ",", " ", "Medium", ",", "Black"}], "]"}]}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"Thick", ",", " ", "Black"}], "}"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Alpha]", ",", "0", ",", "0.7"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Delta]", ",", "0", ",", "1"}], "}"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Clear", "[", 
    RowBox[{"d", ",", " ", "W", ",", " ", "\[Delta]", ",", "L"}], "]"}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.8092479899909053`*^9, 3.809248071659687*^9}, {
   3.809248193140809*^9, 3.809248196217987*^9}, {3.8092482531828594`*^9, 
   3.809248341078129*^9}, 3.809250799731285*^9, 3.809251163050641*^9, {
   3.8092511997911386`*^9, 3.809251225317175*^9}, 3.8092517962321033`*^9, {
   3.809254619275289*^9, 3.8092546395865717`*^9}, 3.8092554019104414`*^9, {
   3.809415261383385*^9, 3.8094153018275037`*^9}, {3.809442884738119*^9, 
   3.809442885773218*^9}, {3.8094453847865806`*^9, 3.809445396380724*^9}, 
   3.809445472586134*^9, {3.809501112811229*^9, 3.8095011814028273`*^9}, {
   3.809501237587598*^9, 3.8095012473445387`*^9}, {3.8095012946769505`*^9, 
   3.8095012960393286`*^9}, {3.8095920052783203`*^9, 3.8095920147978606`*^9}, 
   3.809592406975918*^9, 3.8095925249845896`*^9, {3.809592573661001*^9, 
   3.8095926861917753`*^9}, {3.8095927530700245`*^9, 3.809592754211232*^9}, {
   3.809594448875746*^9, 3.8095944496298704`*^9}, {3.8095944921701183`*^9, 
   3.8095944927575197`*^9}, 3.809594671751652*^9, {3.8098753783959*^9, 
   3.8098753787479596`*^9}, {3.8139978923497915`*^9, 3.813997932521323*^9}},
 CellLabel->"In[24]:=",ExpressionUUID->"c0a6c4ea-3aae-4544-95fb-b7c9684f745e"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`\[Alpha]$$ = 
    0.338, $CellContext`\[Delta]$$ = 0.431, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`\[Alpha]$$], 0, 0.7}, {
      Hold[$CellContext`\[Delta]$$], 0, 1}}, Typeset`size$$ = {
    648., {195., 205.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Alpha]$18570$$ = 
    0, $CellContext`\[Delta]$18571$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`\[Alpha]$$ = 0, $CellContext`\[Delta]$$ = 
        0}, "ControllerVariables" :> {
        Hold[$CellContext`\[Alpha]$$, $CellContext`\[Alpha]$18570$$, 0], 
        Hold[$CellContext`\[Delta]$$, $CellContext`\[Delta]$18571$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[$CellContext`MAfunction[$CellContext`d, $CellContext`\[Alpha]$$, \
$CellContext`\[Delta]$$]/$CellContext`MAfunction[
        100, $CellContext`\[Alpha]$$, $CellContext`\[Delta]$$], \
{$CellContext`d, 0, 5}, PlotRange -> All, LabelStyle -> 
        Directive[Bold, Medium, Black], PlotStyle -> {Thick, Black}], 
      "Specifications" :> {{$CellContext`\[Alpha]$$, 0, 
         0.7}, {$CellContext`\[Delta]$$, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{730., {333., 344.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.809594672942627*^9, {3.8096709141943507`*^9, 3.809670918503857*^9}, {
   3.8098753608518324`*^9, 3.8098753793394012`*^9}, {3.8139978753532624`*^9, 
   3.813997955888831*^9}},
 CellLabel->"Out[26]=",ExpressionUUID->"2844f85b-55b7-4aa1-80aa-10adb49c5ff1"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"L", " ", "=", " ", "1"}], ";", " ", 
    RowBox[{"W", " ", "=", " ", 
     RowBox[{"x", " ", "d"}]}], ";", " ", 
    RowBox[{"\[Delta]", " ", "=", " ", "0.2"}], ";", " ", 
    RowBox[{"\[Alpha]", " ", "=", " ", "0.5"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"F", "[", 
      RowBox[{"x_", ",", "d_"}], "]"}], "=", " ", 
     RowBox[{"4", " ", 
      SqrtBox[
       FractionBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"4", " ", 
            SuperscriptBox["d", "2"]}], "+", 
           SuperscriptBox["W", "2"]}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"Abs", "[", 
             RowBox[{"d", " ", "W"}], "]"}], "2"], "+", 
           RowBox[{
            SuperscriptBox["L", "2"], " ", 
            RowBox[{"(", 
             RowBox[{
              SuperscriptBox["W", "2"], "+", 
              RowBox[{"4", " ", 
               SuperscriptBox["d", "2"], " ", 
               SuperscriptBox[
                RowBox[{"Abs", "[", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "\[Alpha]"}], "]"}], "2"]}]}], 
             ")"}]}]}], ")"}]}], 
        RowBox[{
         RowBox[{
          SuperscriptBox["L", "2"], " ", 
          SuperscriptBox[
           RowBox[{"Abs", "[", 
            RowBox[{
             SuperscriptBox["W", "2"], "+", 
             RowBox[{"8", " ", 
              SuperscriptBox["d", "2"], " ", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], "2"]}]}], 
            "]"}], "2"]}], "+", 
         RowBox[{"16", " ", 
          SuperscriptBox["W", "2"], " ", 
          SuperscriptBox[
           RowBox[{"Abs", "[", 
            RowBox[{
             RowBox[{
              SuperscriptBox["d", "2"], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}]}], "-", 
             RowBox[{"2", " ", 
              SuperscriptBox["L", "2"], " ", "\[Delta]"}]}], "]"}], "2"]}], 
         "+", 
         RowBox[{
          SuperscriptBox["d", "2"], " ", 
          SuperscriptBox[
           RowBox[{"Abs", "[", 
            RowBox[{
             SuperscriptBox["W", "2"], "+", 
             RowBox[{"16", " ", 
              SuperscriptBox["L", "2"], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]"}], ")"}], " ", 
              "\[Delta]"}]}], "]"}], "2"]}]}]]]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"denPlot", " ", "=", " ", 
     RowBox[{"DensityPlot", "[", 
      RowBox[{
       FractionBox[
        RowBox[{"F", "[", 
         RowBox[{"x", ",", "d"}], "]"}], 
        RowBox[{"F", "[", 
         RowBox[{"2", ",", " ", "100"}], "]"}]], ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "0", ",", "2.25"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "2.25"}], "}"}], ",", 
       RowBox[{"ColorFunction", "\[Rule]", "\"\<GrayTones\>\""}], ",", 
       RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", "  ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "16", ",", " ", "Black"}], "]"}]}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Show", "[", " ", 
    RowBox[{"denPlot", ",", " ", "gA"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Clear", "[", 
     RowBox[{"d", ",", " ", "W", ",", " ", "\[Delta]", ",", "L"}], "]"}], 
    "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.809250912003541*^9, 3.8092509869489746`*^9}, {
   3.809251336526797*^9, 3.8092514150658083`*^9}, 3.809251597991085*^9, 
   3.809252296074376*^9, 3.8092557166958513`*^9, {3.8092557999950247`*^9, 
   3.809255800354534*^9}, 3.809257676594099*^9, {3.8094454256250935`*^9, 
   3.8094454608565702`*^9}, 3.809445505599301*^9, {3.8095020598750505`*^9, 
   3.809502091975749*^9}, 3.8095021560401883`*^9, {3.809591861090822*^9, 
   3.809591921483406*^9}, {3.809592095344492*^9, 3.809592102389654*^9}, {
   3.8095921398155837`*^9, 3.8095921640148787`*^9}, {3.8095922773977113`*^9, 
   3.809592356937064*^9}, {3.8095924110139017`*^9, 3.8095924355894656`*^9}, {
   3.8095927935602064`*^9, 3.809592808331855*^9}, {3.809593034547426*^9, 
   3.8095930599486036`*^9}, 3.809593112770213*^9, {3.8095935097732024`*^9, 
   3.809593511310218*^9}, {3.8095940052205296`*^9, 3.809594080813527*^9}},
 CellLabel->
  "In[399]:=",ExpressionUUID->"34175f3e-c416-4966-b5c8-cc9ddaa1c834"],

Cell[BoxData[
 TemplateBox[{GraphicsBox[{{
      GraphicsComplexBox[CompressedData["
1:eJx1lz1sHUUUhcfbpXVLhRSgokGrNBRvW0Pn1h0KpQkVtYs0KWjMdGnTmsoK
pEEIrYQsoQiF5SdyYhlnQzCxjWOvn+PYseHN6NzR/Zy3zdXR7uydM2fOvTNv
f3Jj/tMqhLAxE8IkvjO3fHVuuR752AJ3hr9dXL+7uL6B973hzyav724b/iZ9
v2c4pOcA4wfDH03C1WPDN9L/TgzHyeu5M8P30v/P8X1ofL4KWLzb0ZtjZ9jz
bcG3Bd8WfFvwbcG3Bd8WfFvwbcG3Bd8WfFvw7abwLNHz7cC3A98OfDvw7cC3
A98OfDvw7cC3A98OfDvjS93IS5hRfIXFV1h8hcXXjx8Mi6+w+AqLr7D4+u9D
4/NVwNK3n7JPu0u8/PsSvb499O2hbw99e+jbQ98e+vbQt4e+PfTtjS99x31J
3chLmFF8hcXXjx8Mi6+w+AqLr7D4+u9D4/NVwCGwrtB33JfUjbyEGcXXjx8M
i6+w+AqLr7D4+u9D4/NVwHpK3WRdoe+4L6kbeQkziq+w+AqLr7D4Couv/z40
Pk8FLP8O8O8A/w6X6gx9yH1KHcmT0ft3gH8H+HeAfwf4d4B/B+PLvse+wLrJ
ukLfcV9SN/ISZhRfYfEVFl//fWh8vgo4BPZ19j32BdZN1hX6jvuSupGXMKP4
Couv/y40Pl8FHALPLezr7HvsC6ybrCv0HfcldSMvYUbx9d+HxuergEPguYzn
FvZ19j32BdZN1hX6jvuSupGXMKP4+nwVsPZzOXfyXMZzC/s6+x77Ausm6wp9
x31J3cjLf1+i38/Ceniu5rmT5zKeW9jX2fcq4+vHD1PqCn3HfUndyKu6FHO+
1ZFi5nPfcJ7/Q8N53JbhPL9nhhOc28H4fbw/RL4jw48mny++NFylfKeG303x
tcezoXH/W5i5xCtH3ndX0Y/Jn/dhrgfvx1wf3pe5Xrw/c/14n+Z68n7N9eV9
m+vN+zfXn/dx6sH7OfXhfZ168f5O/Xifxz79/zvpJzwt8j/0gc97Z6SY1+s7
w3n91wzn8Q8M5/X83fBXaX0eYfym4azXE+R7ajjr8TfyPTechi/vjty8Z/cN
p/2z8MJwDgf+/7uHfn7XjgzPTNItjT2ftWPDWc8TP/+FV4Y/TuHU8OOU78zw
5ynfueG0v5Yu/HpeD6ZL2m9Xik5p/isFe71q2y9+/eR36lfD/9Svhv+pXw3/
U78a/qd+NfxP/Wr4n/rV8D/1q+F/6lfD/9Svhv+pXw3/U78a/qd+9WiaD99c
v+lH1mv6kfWafmS9ph9Zr+lH1mv6kfWafmS9ph9Zr+lH1mv6kfWafmS9ph9Z
r+lH1uuin3Rm9OtY6rHey68c5/PEkWLW62vD+bsfDGf97hnO6/mj4ez3nwxn
P/2C8T8j36+Gs3/+MJz98BjzWR+5ec9uGs5+/9P/b/eJ4bxcW34+154azn7/
C//f9vzWniHfP/j/c/x/z3Civ7vj+Sz969fz+r6f/8oLv55XCk7LO3/g840P
/P+bwc/39qHP1w+e360jv/4Pxn4+7499vi+OvZ5vvQSfE7++35f3ef+/Mpz8
tFJwqo/jUz+f+VOf7/aZ4eS35rX//61zw6ke9+X9RuJzYfi9xPfC8/0yNC7f
hwWnfJsFp/l9MNO49fmt4LQeN2f8/6zfRvTXiP4a0U8j+mdEv4zojxH9MKL/
RfS7iP4W0c8i+ldEv4roT6ozd/z+sf4T0W8i+ktEP4noH/Jr8Y/vDxH9IKL+
R9T7iPoeUc8j6rf4tX4+1k8j+qfe9+C77fVa3wPfA4wfsH6Fj+9nEf0rol9F
9KeIfqR8q+BzH/N/iPluYX6lfub9u4Px+3h/iHxFP3/eijhfRZynIs5PEeel
OPoPrAFMlg==
       "], {{{
          EdgeForm[], 
          GrayLevel[0.8], 
          GraphicsGroupBox[{
            PolygonBox[CompressedData["
1:eJxNmQn4l8Mahr+JQmTfSaLsS6JFSaWSVChFoZJU1haKUKdSliRJKS1Ssie0
UFSSfYmUJYk4m+OsjmM5due9z9zf9XNdvdfMfPPOzDMz7zzv8/9V+4KBnQdU
KYri1C2KIv4Vu6ai+DLKP4TtGfVvo/xT2N5R/y7KP4cdEvVqYf+I+u5Rfh3l
H8P2jfoPUX4Wtl/Uf4ryL2F1ol4l7G9RPyjKLcP+HvX9o/wlys/DDov61mH/
jPoBURZhf43iiCirh/0r6geH7QEuxobtGLZTWG3LnRlruUvYgZa7htUN2w28
YSeHNQxrxF6cb6+wQy33Bqe+rHdUrL9d2BfsxfmY6zB99wEn+w+rGVZPfOA6
xhJcjV2PdY4Oq6VfffvBe6xlHTEe5L4bWTL+OPvZ05GuuV/Y4WIBx/GuA8ZW
zsu4E9mP6ze3BG8TfZnjBPfD3C3sZx8tLcHb2vkahLWxBO9J9rNeU+djrq29
Q7C1dT+cRzuxsn57x7B+x7Bm4u3ieqxzqr74nWY/+zjdErydxcG+z7Rk/Bn2
s4+uzkcsdPIbY87yGxjPdwz93cJOEW93S7CcYwn288I6iL2n+E53XGP32dv5
wHiBJRh76ct6Z7s+4/rYzxlcaAn2vpbg7e8YMF5kCcaLLcF4adi5YrzMskfY
5ZbgHWAJloGWnMEgS7APtgR7P9dn7Sv8Bt4hYgXjVfqB8WpLMF6pL35D9cWP
OCKuifth+rKP69wD2Idbgn2EJdh/Zwn2a8MucUwP74T7GGk/exrtfsA+Vtxg
ucES7BNcg7nHiBu/G+1nTzdZgne8WMF4qyXjx4VdI65Z9jH3LX5jzG2uA8a7
wm523B1h17v+ZEvwTtR3VNgk94PfFPvZx52W4J3ufKw5wxK8U+1nH7c7H3Mt
C3so7OGwmfqCe2nYg/bNcQzrz7W8wzHTXeceseJ3r/3sY57lFOeb5r4fsmT8
ffazj9meEXPd7fnRfsR1wLjYeRn3mGNY/3FL8M7Xl3tY4Fz4PWE/+1hoCd4l
znd/2FNhD4h3kf2s96jzMdfT7h9cz1iy5uawt8LWhq10bTC+FPakc79syRmv
cF78ljsH7Wcdx55ecM9gfM49gH2V/bRfcT7u83lxM+ZVv4F3Xdhq+18XN2u+
YQmWN8XN+q85Dr819q90f8+6/nrne8E9rxIjMcqb4y297bfV2kLx1Uj5XN4N
e88z4mw2ujYYP7QE487hv0PKa37g3vDbZD8YP7JkH5+IifU/teQMPraffWzw
7JjrP0XWRGgO9A6aCJ1RRS2DbkD7oHfQBmgoNBG65H2xMxcaCn2EhhhVZB6C
g9BZaCv0CpoI7YP22FKdhc6opj4ixxfqKbQLOgsNhV6ZF983h7VXN6FZahYV
nbR/UdFGB4ijjm3mJV8fVlS0VG33U1c/1jjIdqmZDhHfYbbBfbB+5PsjnHdP
fQ8W05H2lfqmofjQG0cXFf1UTyz1bZc6qb44yBloEfI2+air6zR2XjAdb/sg
12FMLdc5yr0d57zso4ljwIceaSqOFkXWGaUeauG85Oq2RUVXnSi+k/Rj3la2
G4q1jfja2mb91vod5RzNPLumv8HUzvVKfdNZX/Jbx6Kih05zzKmOaWZ/B3Gf
oR/4Otlm/S7O28az7CLuzvqBpb3z7uid1XIfZ3sHpU7q5nrojXNdv4ftUtP0
KSpaqru4e+oHvl62S83UW3x9bIP7fP1KbXShWHvbB6Z+9tHm3Q0sKpqpf1HR
TBeJFe1wSVHRTJcWFZ10uXfQzT2X2miQmK6wXWqpAfr1FwfYr9QPrENsg2+o
7VIzXSWmYbbBhGa4RkzX2S610XVFRRsNLyraaIRYRtoG6yjbYB1tu59rDhXf
9faBCV0xxn40ww1FRQPd6B7GOKbUUowp/05oLW50yM1iRVfcUlQ003ixTrAN
1ttsX6vvOHFPtA/ct9sG6yTbrI1+mFxU9NAU5yJXzyoquuoO9zBVP/ChQ6aJ
Cc0wQ0yzbINjun58Iz/PLyoaa7r4ZrteqW8edD30w9yioofudQ/3OKbUVXPE
fZ9+4LvfNms87Lys+Yjtaa7zgGcxx3lnivERMS0QNxqBHPVyUdFMjznuCdul
NnpCrItsg2mxbTAtsc3a6JknxbLUNliX2Qbr07Znu+aCoqKfnhYfGmO5/WiM
lWJaZXu+/c84fqVjmPdV9wbu5xwDVvTJarG+YBus6I0Xi4ome8l9rnb8/d7B
VPG95hrkSjTA7q6PlljjeHTMu873vu0V9pc6i/J19/OW4y+KPL59ypqItdEq
pZ5aqx972+C87AEdtE5MH9iHPvrU76V+2uiam2yzHhroI/e00fGlftrkepv1
Gxhz1gvbJWUsn9jH+ye+JxUVjfWJ57fOb+QONBXa5MoYf2zYbmHXhTUK2ytl
rYIuQqeMj3bzsNop6xM0GP0jo3182D4p+33mPdwU7WZhtVK+DzQS2mRMtJuG
1Qy7OqxB2B4p96G79tTQV2ice6KvXdjhYdPC2oQdHDYxrGXYgSnvAb23s2PQ
hGiiZzxrznJy+LUKqxs2M6xt2KEpayR+G0ETzVO7HZmyHkPv7etc6MB99EPX
8ZvPA+E3OOzolM/yS8/zoWgPDaufMq6vxXam54QOPcZ7Q9ue7hng93CU14Qd
F/ZI2Iiwhinfw3feBWf/refPOaGD2Xcn742++VGODmsc9ljYhLATU34faFbu
5Gzv5yfv7Qfv7tH4dkNYk7AFYePCTkj5Dn8pKneFDuauzvUeaHc3RvDr6j0z
76AoO6b8G+fjYZPCWrj/XTy/Xt4tunth2PSw1infD3q6pndLf3kn1byr3t4n
7T7GC797LQ6bG3ZK2KKwu8NODnsi7M6wk8J6GBecY1/vn/UuSfn976TBAXAI
JZwARy2J8v6wU1PmmRp+X++b571dHOWOKbcvTbnN30xPhg0I62AfPp8aX/zm
SYzV88w4n6eivCLstLApKZ8Xv+nydnc31oanHGf8ZtzIktgZknKc4Uec7qb/
0iivCjvDuNlL/2Epx9OexiXxSdw9HeXvwrqELQu7NqxzyrFJbBNHNxsH/MYM
N+zr92eivD7srLCxKccfv1WPSjlWyt+waxqnTe2n3sz5iMHlUd4Y1i3l98pv
xF8Y17X0aSB2MK+I8pawc4xL4rOMX+KWN3S7cVDH+CMOia+VUd4Wdl7KfFNH
/2ejvCOsZ8q8wj0Qm6uinBp2vvFU1+9w5wGue1fK8cpv+c+FzQi7IGWe4zd3
4h1+4nd5OKiNvuC5NeX3xlyzUo710o9439c3cehvvh3unM9HeW9Yv5Tj+0jP
bU7Kcc/aq8Nmh10Ydl9Yf8+X9wvPVTEOyRnE0IMpxzB8RozBeVsYR42MpXUp
82Q9xxxr7K1PmSdpv5My73FvxDCcV9U4hAu39I7gjOrGYwPv992UeZL1NqTM
V82MMThsK2OqqbFEvMGL1aL+Xso8SZy+nzLv4UcMw3lbe+Zw5zbGTnPvsZbr
fG7sMwdx/kHKfNvc+GppzBCPvCneGe8X7tm2yDHSyjj5MGVeok2cwH/bFTke
2xgDm1LmxjbGAHxWo8h33tZ7/yhlrqPN/cJ/28f3jSlzb0vjop2xwV3DYTsU
+TcMOI23hcaAn/4d3z9OmUvbGTvtjZ+XUuYB9gZXwfNwDDECV31VZN6Bf+CS
F1PmHNpoALjnm/j+Qsr8xvgXjSdiCU0Cx/w36penzJ+/LzJfwBtwxmspv3F4
B63CW/+1yPoErvo+6i+nzF3w4yspcxHj93cc3ADfwEtwCVoFrvqxyO+Ndwdn
oG3gnp+j+XrK/EDfmym/Zd42PAGfwAFvpMwVtOEJeBuOQcPAKyllfQKXbBG2
JmUOwQ+tAjdslbL+gVeqppwzeU/khUNck3f/asrcyB7gBfgBDngr5XdNG50D
B2yb8tvmjZNvyHWXpZzb1qbMFX39Rt87Rc6D1GtYXuJ37uRS72Vn74icdoRz
VPcb90eegy8GuI/TvPcqxsAg6x304djRgXDSNinnzYGO3dv7/E6e4TuxClcN
tt7R+eEeOIe4/Mrcig8x+4DrUi//b4a/6dFyxOHuniu5h3dP7BLD8BCxSfzD
UZ2sw39n6EMMw3FDnQeuI+6/MU/Be3AD72iY8yzVh/nhN94A8X+c/oxd5nfW
Ip7hNTgN3Tjcs4FHRziWd0D8V/UtDLfeSJ/yLPGBz+Y7J+8MnuQt8Y6IWWJ+
G/XASP07esa8/YfdC/uCF0c7D/EJL29lHr/J8+Qd8h7haXTCGOvvW+cNPupY
3ugGx/6sTrjB702s/ygnwONweGMxgB9eH+dYeB2uhivgADgEjl/gWLjhLLFx
tufos7WaZJw+cP5452nunHAG/HCrZ7VCH+Z/zO8lr3Ce5Ar0xkTraFe4mzdE
3oO34Qq0K/kDLiGHkC/gDXQ1ORLuecM6ubKlY/m+xrHkHfgIXiL/9LSOfyvn
ZH50zmR94J6pjoVv4DpyDvkIboKXVlknX6HhyWHwUy/H8v1Nv5PXyG/THUvO
gu/gujZ+Z+xGz4S9X+C625krJ7v35xwLHriOvEhOhDNmW+9jnbwH/8Fv26u1
yJXwJTkOroFnVlvHn/w51+/trHMva70j5jnZecDf1/nJk+iuedbhMzRT/Pt/
viXPwsOb9aG+SPzg4e8LcjM8DafDQbyXt/1OvobD4C+4C46Bs+CZIdbRZIP0
gRfbuy5zdnNO3iO8wrvlzQ6zDt/wnnh7vC9iijgjHuFRtCD8DU/AF+U7o857
H+tY3uUkxxKHvC3eWPkWqfOOiDvim9jjffBOTjQWFhoPnCE5YBfPifPi7Kc4
ljcB35NLyCN368N53uU8rb3Dxd7jQOfs4Nks8Xzm6HOK58137m2C2A5wLc4B
7oPv4W54G26Go8kPcCpcCU/CAXABXHKtPnD4SH3gafgGHoQD4bnl3tUtjoVD
xugDP13tuuQcuAQegUN407xh3i+xTEzzJnijvFXe9ET94fVBnhtcPlUf3iyx
hCYj7012TjiDN8fb410S78Q6cT7POu9stuvyjmbozzslLolXcvFVzk+uJN7g
fTic/cLjpQ6HT0u+pA6vksfIZ2d6nuTRLf3bgXonz5McWU39T72r98LYqv59
AW/Cize7bndjgHfe1xjg7fX3fOBT+JB9wWvwErmUHEw+naJPL++C+av7NyD+
vT0fOKuGe2EseXuW3/t4tmCAZ3iv5FHe7FjrcAMxjAZC1xB76AZyO++LfEm+
47zXe+a8d7QIWuJq6+iREY5FM9zkWHId7xod8L26mjq5nXgm/zU3luBrcg7v
Dk6HD4k9uBXunKD/r/6NAB700WDxo9ngAfgdbh9jPJDnJ/udHEUMk3vIFXOd
H36e6brw+nR9yC+TxEYe4Y3DufDt/wAAR4qW
             "]]}]}, {}, {}, {}, {}}}, VertexColors -> CompressedData["
1:eJxdWXdcjt8briRkV6IvWiJEVqUSV6VltDWtJKRBRjsUGWlIaA+FjAYlaXhn
O+1SqbTXu5QkIvU7/v355/o87313nnOu+7qvc45Hxv682SkBPj6+Tn4+vlkE
Y2P+/cvH/+OEwjf15wQP5JhFvCS4TNZoLI0gne9ERy3Bm8Meip8JfrerTOkl
GBqq8kEkNh87xxcGyxN8JmOZqkEwI0Mw7RzBrfnBOg8IXmu85ZBHUOlWglwv
QWM3sYf/xeWjvuZLgznBHNVDLs4EnXjRboUEX0zXxS6Iz4ehm8OLuQQjdL5n
XiJ4hpWxp5vg3GPBk+8JfvEIXa2VkI85Y0fUqgievmsS6kmwz7gmRiYxH5of
/4rXEJw0o77SJXhUl19KNCkf2+lCt/oIGkdIFUgT/O+mY63o43w0Cr85IZyc
j0ITmsEc8nz7WvIvGfLc+WgmVzMlH0LThfN+kd+HzsaLaZDnyoMDJYFP8lHN
7Gv6RvIk3fXK7cjzHP/smaanhJ86hWdrxqoQYCrtXppbi6Orvw9f1qqHx44V
kyf+VoE7cnrQpqgWXzWU1zbr10N2XHxVs2Q16jSFp4qHa/GhJi+13rYerp/9
b723qMYf173vREXrkFxq+/SHdz0EnmtItj6uBjdl/bPlu+vQ+uB2duTTehx7
zVfBnK6GbePHpwkX6tAZMH9Vz+d67Fq2svuTaw2WHdwn8+F1HSiHQ/uHVjQg
wi9G04Zbg1XdN8f9JuqweaGHYZZdA25Fv08N96rFWaFjL4d06tE9fkNT600D
at4WypyaW4f0h5lP5sXWo45lHpks1IgF/2mm59jUQSJ4++Kp8Xp49Z9bOWzf
CHXdJTc9yPtiF/5+PXSoAWPXBM+rFzci8FnE38m59VARExsSym+AP016cd2G
JghtEixIPEXGvfHEKlW6Eef8NvJ9j2hCabqEU1NxPfbtmx8lF9yIQ1P9vjPT
TYikOAe9y23CsgF29NHmZtAvLmQGWbZCTdG9KYXeBJHaeUu8eppRvT6LWn2i
Ffvt3UsEOpuQupG3w1ygBfZJDvQ1N1qR6/TFirLwE5Ysi6x7t7MFF3y5M4b5
rRBhmnkdNPoEOb1t0ZxrLfDI6qm9L/AZgSsrOSurP+Fvvv8Xg98t+DR/lM/6
4mcIV0iZpp9tRoRjvObqe60QuF5z9cmvz7gdKn/ESaIF2sv6qJtUPuPeNmtD
+3ttOFjgylX53IK5e9ZmX+N+Rth6+4nBHe04k79VeHFqKzTfl6mqvW5D4LZV
CvF97dB7akBfdeUzpLrC1J/7tqOGe1xVNL4D9Y9qLYsOtyH9WeJcI+MOVNMX
Bi46/AWjKUeTU9GOV9ZmxiPyX7C/QKf+tmQnzKwM/2Ss68ChXBo3ZFYndJaO
1Wb3d+JSWglv1uIv4EVtj3Ps7kRsc2rtVFoXjAZHpG3bOkC1qaq3zuzEjQ3q
iXVXu7BxIrno5EgHViabnLZmdkIhk7uzI7wL0ysoG5dt/oKJ/VNRf6c60TEo
r1pW0oWdmXmUqntfYBEXVNBk24WLA1lS6gu7YVItpMUS6cSD7CQpz5Yu6DV8
MHfX7YbGZX2rhKxOiAXGiGzc2Q3llrc/bwZ1Y9iz7bLqmS78J6Gp7xvajX2e
OvJnW7rxOig0InZ5N/w2nREO4naj5s4Kb8XNPXhW4uWafr0bkqK5wsZmPci9
Tp09K6gHbi/64gvFeiD1aXW/VUsPHlc9LmH+7UHi3HrB7696oDFtsnijXS9+
rzVV/OTei6lLbfOU9/Zi+PSS3a3sXpickjkUNNILtaZhkdftvTgcudQt370P
s5MOaDqd7UNbZdbA54t9CMzRMD0704cI0W519PYh7aiFvcecfszkdymX3OqH
0mx1xXk2/WgPrL2wYHkvgnvD8pOYvYiViNXdXdWL7ivCVMF15H1Pk/W163rx
JFzotlJrL/xdSm2Pmfai/NqoDvVnL+7GOq1p/92LX8mPD5s/6sWdRfVDT5T7
cOGMseDmbX2QDZfvv8XrxS3pPdzJm33oCNdwzfAkv58p2cW16MO8JfcXLBno
w7rZkW+kPvZBjOdTMVTZB2qO7oIE436UbRgKSV7fD0HZyrVK+/qxKyZtayqz
Hw9/7E19FNqPHbPjGY3V/RjKstpycdcAYjX1F0X/7EcfZ8F3McsBZPD7dYa8
H4DTxjr/AIcBGEeWbozvGoC0o0pAndIgFuTwQs43DOBmdNVxZ8dBbFH9HuSS
NYjP711vVGIQT03m3+r7Ogilm49GBhWGENGhlaKXNoiHPucs6ReG4JrSZrHi
yRB8xg+86xYdQsbyJbOXjA5hw26av5z4MLiTVh4tXkPYE1Hqu/ngANIfXfa/
nTmAA5P1zZFHBrAprnPZ5cMDeBhcZ3fhwwDmslxeVzkOwO3tjvLJWwNQTbe4
uax/AIcvvbkTGTyAg14/a69WkL8rvTiTJj0I0xPbDZj0ASh6XJa+v3oQ0Sbv
ROBK5qcvnvxj1iBy5tgKFV4dRI+zbju1ZBAjPNGpJNNBiBquOeDAGsRgSdO2
gXVDCOQYV/WkDiL3+d25PrZDiKVMHB4IHUI877aYHv8Q7n/pSdapHULQ3M5i
3V9DcF97uvbxsSHMCTVjr1MbhtSLrstTtsP4kf6WYv9uCEmVYvJ77g7DjtMk
EJ02DOfllXcCpoawOkEksvDzMNz2iCjF/x7G5a9gqWoP43XK4BrGOhauqrL1
N+mzIDavSaL05jC2TAs/zXBjYce6tDkvwlk4cXUTLa50GGzWUo7YexZyjPq4
T5pZqAx49ttWkIX7T9fJ7E8fQluQQdnZ1iH4/hXZk6Y9BPmg8hcnCofQMK+0
bP3gEMZPnfMoNBpC8GqW1u2BIWjkCqqFLBhG6/KMTme3IXA8zxiskR2G9t3/
eCt1hqEguOjGjuQhaI9VcddZkXlv8H9X4zUMZWUd92zCi8tXPrk/EcPwmV2X
pp8zDP1mF28FwWHoDQt2n2scRtvrCgmb8WGIdwRcydYYRv7eFRp54iyEqYl8
2rWThYslUax3nsMQTS5esu8wC5dm+S5z8GVBpDvtbuvbYTjE5aRVJLGwqH1Q
yY/GQt3GD6PckWHEKuVHr+5j4fJ3gQtnBdjg3tycPLmRBZklq5RPy7ER5p/m
Y7SXjT89C2x2ObDAP/bImu8kGz96L8kGBbBhqZMxIxvHgpngNtGriWzEBolJ
p39gQ7jz1gaTWpKvn2aS2MxG76Ewpsc4G0PGVcwgPjYWpewuqZ3Dwu4OjZVO
61lQ0ld7m+I0DMlmPe0fS1lgPfKV9N/Owqpd+XV3Lg3jqc076+TNLBx9MTXD
b8TCvs25PdXBw6Dq/Sg6ZMHCs7dRX7zcWVgeavwyKXMYukfusBIDWVgpfLrX
5ykL3kbbDCVah/FmQGzTxzwW5KTc71u1snDAS8CmfTYLQTEf1oiPsnB3+Zkd
RovZkNt9Y8BGhYXQHavSV2xgw4yZVDapz0b7wtoJG0cWzrWd1I22Z6Nj3kyG
DOFh6p59Xlks0RMlciowjo1f700j3uez4UBXf55TxYKW8U47vkY2SgtPWHaO
snFIODzt6F8WOUfxSu3mclD8LsGct5YD6Bz/tXkTG9rbo1dv2cVB9O6ATees
OcjLD5ekWLMRHsTfIe3Mwda3NyvF73DgWDBCq7jOhkjdo41Lojkwq6q5x8jh
oHyucPr2V+Q9i/2UKsdYwOdHctNL2VjzOLgzT5WFcp+VbvFTLHi1nD7FWMlG
BVvlp4UWCw/TG2wyxNkQPHwo9JUyG+ZTpWe3W7Mg+eydRYE6G04itSH+Nmzc
Of0stc6TBd776EI7BzbUDv51HiLz0OxoXGQdz4K7f/mQ/X02+GNWjj19zUbR
yve36otY+O/4Qv8LdDaWuLsVO3eyof62ZEScR/QnL/r4GuHlZHhZ9NZFHDyd
OeuusZyNTHWpszHSHOiIHxHk38OBQf0iZRctNlReIXjYmIOUglXTc1w5iM28
o8p2Iu+XLtpPvcJBamZbU1Qs4UdUUnP1Aza82RE9US85ELP6EaRYyoH5Sf7Y
CFKfjvGFHasaOaiPyNl6eYQDvwXvsqe+kDqZZ2VK/OYgpmRHiLI4F3riGywU
+Tj4plia7SXJhdgipvhRdS7y98gHipH5Ddft+boolY1R059u24rZ2ON8vGvs
EwsFmsz3IWT92au96Y+r2Yh8+HtIt5OFudL7f/4pYyNdSauQPcDGROVX4Zzv
pC6+ow/9hkl/NUyWqAlxQM/LiVFewkZq8TfHrws4qJQomnV5I+HDw9dg01Y2
vjEpP2J2cPC72u5RvwkHE+91noibsfHmdcmSmMMcfFlr/jrVi/AUb1S10Z3w
e3F2v3wgB0mnDFJ/Puag91IlPyWaDYYRa+hOOgdtJXTRlRUcvNr5eZ486WNp
XznxpU0c1E3smzg9ysGCK04DDaRuFQ2a+UqEH413ga4mhJ+7rvcW6BF+4lQ+
5YQQfq7mHfztRvhpOH1uyTrCj2zUO5dPmlxMCz86c/MIF5mTk093knryVV0R
YttxsVN1i+hZPy56/Wo8bW05uF9VBepVLmqmXaoXx3IRmudcfuMyB5m/rjT1
b+Xgj7Xpox1GHOw5vLsw15iNxImosqXqHAg9fhdkZsXBf3rDX5hWbBiKrTjA
Jrx48TUpzT3HwR2nI/pVzmxEzJNlryDPOTL2psLBHGjX6Nk63GSjLrTOaDCU
A47tVaXnrziQox7ON0hm4+vE6CGp1xwE1LqEZXzkICNnpaALlY2nPw0cleo5
cNn17VkYjwOt888MTTrY6NfVDYv+zoGT+DUr6mIujtsOjnr/Jv13fPWi3GVc
SLq+qnm+jQtPm4qEUys4YC8dCOLfycWU04rrdDMuNsisk4hR5sB+T2X+XCsu
zi3WbY28yMW3UcP1b0w52BtpvNnLnYvKwYmulnAudjjIJpxw4eDEo7zw/yK4
OB9ZFmmUwUWQ2sXsqzc5oDluvN6UzkXJTFJxVxkXVB99h5F4DibVdeWTSrgI
kXsYE9jNRWTGz9cZ2WTep7LVZyeS/nH/FJRRwEHP9jeqLkTH97sPXxlMJX7E
U9cKKCL6qbacVH5P/HKJcKT6Bw7Oa/6oz2nlYKnFt3x2BRvy5poPjjWTvrXY
N/pmjOgwPXSopZsNvyqts6vI86pDBzx0FnFx09gjaNMk8cuEc/155Pm1ba/h
u41cVKV6u+mIcBD55E3foAIXUlrxH3P1udA5r/WzXYGD7MFPIZr7uGC5PX7T
58DFIb7QihhdDkRdpJ4dPM3FhNVy36IAsr4un4eixzmw9SoYiLzOBYN++1Fv
AhfG27ce7fPk4PBZg+c08qwo48XuyePipZQc3t3jIP+XS1bAey70p6TS/Bq4
+LujLPAgWX9YOvVNVi0XNoMbS2+zuZDwdlW8UUj4r3EIUB/kQuTm9M6vfDxw
wp9n6dWSvlgvf2rFHy5c1q0wSF/GQ27YotIHPRyIlFpVCPzg4O1tMad1S7k4
oq2d8v4P8cfOoZiEvyTOa/gvR4KL2S+3xO6dxUHj3z7j6yTv4ZSSt89mLhpf
L5bLFeNAeJ6nwuB6Lsw/f3leoMPFtvG7RWobOBi4xiiV1iJ9JPjWqI703Uoh
tUJv0nf5H0WWfrHhYsF9ZudpoqNLb8fPKxwi/W2+UmCa6Czvm6DfiTAukp/o
OCs7cVD7wyFBNYTMT/VkvPtzLiLa/g5b+JPfJfhH5Z9xYX1haHAPnYslBW+P
K0VyML95guZI4SK8fDTPtpWLmRvvy73TiA4iDUxfNnERSFdo9Bzh4tla2uVO
GuGzOXA8k/C4bvPLrsOzebhICeEoEl9e3a4XbDHDRYHByp+9Ejwk3E+8dmCA
AztWp2KICA+sBzEHpzbxoGOpdWztBAfdbTc4JnI8bNphMfJsDw/7rKTqC2Zz
0VrwS0Z3F6nLN/WYv5Zc9IV+9LZUI/Va0amTuJcLmpcv3/7jXNgmHm95oUn6
2aBl1waSZ79wx+u8C1w4LRZdyyU+ohjgGrnMmYvctiXSN29xcdtIiKV7koOX
Z8N3HPDnIlaBejI2jovC3nBelzsHO68ezCx7xMV/9l9XTLzh4nvxKok8sm83
zZ3qC0sj9SoXXx5fysV8/uO19XEcTNsVUM8wiB86OCSZd3Ch5Hhg5ncmB0bK
Kq1/mkmfJBjWln7j4rf26t4hBgdHhm80jnOIXtUfVycJ8bCgyDD/IPHrjrN7
kuYT/ZlfPPIj6j8eokXPbeUQ3vxtN0YsFOVBQzSE7beZB6pZX2sk4S19/wVW
O+Ht3Ju9ElvBwxl38TwlIS4ExTzzHJV58Jwt9+qJMQ9TtjlReWJcuC2TFn2r
w4N2uHd28zEepJVfvpCRJbo4HumRc5kLTTO6+TLiS4LxJRPvyHnF7Kvj/Dri
7wlddXflorn4OV1t1XCRg0PrQqPEic7yOm5QTF6SvpZeLzkZQPrxh0RO7WMu
uu+4HOAVEp6DB/sdIjj4eFR18Nxbop9BV3G3GuJXl8ZG81M4GM+4kLWN8FgX
sEdHvIcL0awYZcW3HBgbP5m77TMXGrqZyb++E/0anHvYQnxrcpedB7hcGAql
TrMIb/e1+hTDCG9r7i1TWUr09nXfGuEkojeZ9AP3FxPeYr4q9Ngs5ZF7mXjD
RwUeRtp68leQvrVkelW2yfIgPsOdu3030eeU0ZuLgqTP2j+Gn9nBQ+WQ/P1n
hjwwJg/cmRDhIkzxcMiANg9fPz3lzD/Kg+SkSE+INBfZzQG/DUx50G/JPGPj
zMPdvQpOCqS/fXpqbt4n/GoesHoT6sWDnMGz1npVLmTvBIf3/S3Gnj8qGatP
l0J961epG41lkBUu/2o+vwQZ7+xnfXEvRZfEHFbMQBmCby8SHVlbgsg569cI
PypFU9CRmrPzyiHvd/zqNsMSGMqI/hQuKkV75/x6rT3laDoo6XDavwR09syT
+TOluGhi9kjxRjlmY3BBLrUEUxKhDosNyjAlm01b2FKOSbWHYzvmlGJoInYp
f0IZPOjVY49VK9AUJXmIY10Kr5dqXYypMgjYHKEkplZg1bIrXqzsUuQmV9sr
ny4H/ZygE12qEgJ5Pft0xcogZlbst7+1HAvkbTSqUirxXGnfMTm/Miyx9NvD
b1YBj0P6O+MVP+JwWkgVhVUG+Sd9u841VCDj2TyeDPMjjEIsDQ8fKUefxOLO
QutKWO2SEHQ8UoXHBaryNo3lKJjsP7CxvxJd7cdXRUxVwfzlb4GEmHz8HOGL
+Yfh1orbEgnmV0X4jAqUoFnkYOZcl1Jk1I6eMW4rwwql+607porBFMiqWuNQ
iu1J54T21Jfha8tXpTzyd/U+rR4Ugj2+IlVMgo3XQxfNWl4CnkvPSOiNUuz4
RuM/9KMMSj7yy76SuKmAWvQUwRL9WJP5sfloMTd9PVu1BOWCPgoar0rho1Of
zpQpx6GT1i92k7h9TlqzDcGFWTddPAjGDgZ42p4i+U9sj9h2lcLA5UxP6bFy
3Fqpe/8ZiZu9mohuJFjMx9gnEJcPky8cc7XEEvhIrl06LVMGDcs8U/O0cqjS
RhTkSLxmzc+xMwTNIv5kp//LF2u6TO0pwXkrbetVF8pgseaerbJQBc4e6H35
nsTjsktLxeLzMS+vQO3f/3+ff1tT8lOxFOaNk7djPpYh//saOflzFQjRnFA4
RuLrAkd7WwjyjS6wMU/Ix57T+s6jgUR/fVrvLLeWg6N2WaKrpwKVPsdblpE4
NURi5WuCES877u9PzEe08IZ3+b2lEHbo2aKRWA4fvsDvK+2IfmhyAx0kT+mM
jG00yWtVL7pmmZQPn09XHC/ol2F8eVi3plgF7DC2JWOoEpomSM8iecHLZjLu
k7zvW14OXn5M3nPBOUk3uwxuGUaN5+5XQDJ/u4GX50es3LLzeQTJs5owN4oh
eSX+5gVPkvNxeVbuWw/ZcsS/hseAWCVWnKrU9V1UBUvbAx5XSd7h3rHEDJLH
P7xfpiclH0Z3NXKtosphtzNybVtCJQ42rzlZnVaF59mbuy6RvI1Hw7dUk7xs
Zf/LCk/zseDkHI7hkgpkGgvej1L4iNHdEzaJRtXIORDDiDvMhaXU7wFZTy4S
/Y2V3lqQ808UfZMD2d9PfG/M/kr8WPl5lyPDnAObhm/5Rw4QP7pavMXjFA9+
cpSoSXly7rx/QX+JNQ81s7uOil/kQb5Eynb1DuKjU6/4hzy4yIipD9Qh58rO
20JWT8h9K477w9/CjAdvRBxycOFhZ5ozV1yRCzk3nZ/B/XQo3TP9djOaAYPz
t5YtM2YibuX1NRikI5o58+VGLANDklqfjpkywd2WZPOERcfsgjU7ryQysEDi
gPuIBRNbSvvsc77SERidv8D1KQMq7Wn7GEeYMN25Y7HLDzp2u9+RPJjOQMSD
ddMfTzHBFp13mPmXjokPz+YuzWWg/9fhCsELTBywlkrMmMPAuTpJnzcMBtbl
P0w7dpWJpobddFlRBpa/bbu4upZB7j3N7ypDmVjtXHZhmTQD4vKdN/d1MnB3
fJalahITMi2Vp7wUGdhabLF67QgDj1cKPHuUzYSPdlzw7j0M3DwhSk3iZ4Iv
SiuntoyJjsg9epbGDDgPBhi8WMZEd5xNa0MnQTHTx29PMFCYflF5swITHNnu
r3d/MpGcY+Gr586Ajm9Y9SptJsasJBL7lhYhRboofyaIgVfP42xP2TJR7nw/
tHxzEX5vdDtZl8SAh+Ymsx+XmDA/vyZq7YEiJDodKH5J1p99Pt67MIyJV19M
RwfPFuH4qps3r9QwoM8Km/X8FZmH19qDk0FFkNa+xtg9RMav2vf8OZn3nBuz
JvalFaGfMiHyhY+J7y4+2RkDTLgVLxssrS7CCit2ktFKJryK/ix7JVhE9omf
tce+FUHlaJX0LRUmFJ11zoXJFSHU9OQmfvFi2OgF93uaMfE1SXquoW4RNCSe
7EncVQxN95/1K84z4eht0dt6ugiWoefF5e2LsUBN4MyxECYKiqjpa8n8Bi7w
wkKDiuGUq5u7h8x7+JBTiXx6EeyibQ8UZxUjRUD15JtyJsLmySk11RZhkfVo
FrWtGN7qxxJeDTGxtejTU+lxMr6L64CbYAnU5hTqJv/zW3vJqBSCuZtseE8I
Ptp8cPeWATrqDLfv1Y0hdd5u0DZKdOvyuiPQguh5VfgzOT2i52MP1Ks+GjFx
r+yeUhH5u9st0raVBNfP/R5TT7A/zDlugkOHbfFknkoyA7L3PmYusSF8MS0T
Zkh8ld7RNUuJD/sXFLFkCd7zdB07OUnH3Vz69bE3DFgauziscSb6Lx4/a0Hi
7JGxdHeCIX7upyMJxj1+kbVzIQMhe1LkFMsZCDDhOTfeZCJ6VuP6IhKPjK/R
nSB4xfWe5Ebiy5u1o+kS8gzcslrrcH2QzKd/37ZXL5jYc75gvT6J93cbjYX/
82/H8cp2gtH+Gx0e65F+8S07cmk+E66RzSclGpnwKyh92EXit9UFQ/f++57Z
EDD+guB06xwTK2cGUjgLy71I/R8LR3gHEl103lgbepfE48696ZtP/Hhj7bFl
9wiWxx1dVPqQgarBqauzzzCBN+ZG+zSKYL2mWF2PxIVzLWqGCI7v8H4bTHx5
7dMl6u5MBlYWrY8NjWdi1ds5m8u8i7Ah1OHLEhKfaMvFJ4K/S7wvxRNfXtR4
x3rsOwPCK1rG7zYzITj4YPrkhyL8sghsGiZ5S9+XGDeQvOkamhyN+LJGgZ9d
w3omKhr6Zf3FirD+jNube7OKcWiC/2kVyVOhi2l9IXncnuSyf99NV/Vkyby1
Y8L6oJn4b4si6AX3rig1KkazX8SPApJ3jxNyfZzktbU53Nv+hOyjxlfqdsUx
oWBdwAyPLUKvJzP7XkIxXMXnRGf/G0/xQaY4yZPo1ey5Rnw++oTNxKpWJhZr
aM8f6inCsVuFdwJGisFV4bscS/TzEIEx/7BcIoL2D3c33T5UOETH+6tZR7Xi
GejqvPPgmDkTvqYV3ZkkXlXifSeb4NGoqN25BEtfubW1fyN6u7NSVeoFA32z
XdfxnWBCdMGT9Z0kfum0xwiLYNDS0J4fBPtcVebcEmDAzE96Z2ohAy6zqnzP
eTJx2cbN5d93dMvaeRX49518new1a4LX21NUXCUYiJQyCPFrJn0UF+akHcmE
+Ls5p4L+nWsoLY+yY/+tc/JoB8FXYo9jtqiQ8bedidvyiwHN5MIDvz4wER7j
euXfOeXsJ3NfTYJNfBNHrv377q5UZ3LUmoHx07GGGtLEl36Y3p1kM0EPVxv5
p2OBQ3NODREsVrm8AkR/j08O7Ll2jQHp5ujFy0nfCuv01T+TKoLpM+0v20l8
wrNhzTOCSbZbF0kQ3T1Lbu5flcbALPO419sDSN++6P5ma1uEDoffZwdJ3pMH
knf+fbfPW3+sUJjoyUculUdvY4C+cH7W7HwmuliLp3xIne9rG5a/JHkqEU/d
j5C8N4vt3i4levpl+MtmaiETAc8DZi36wYRG0/gdt64iLIycq+9L8i7vKB81
JXlBbZKvFYiePidePO+oQ/YTYt2NSkWomooyy1pfjC2rr1nZkDzNF3brLEne
9+jfjyyJnkZP1L98foVJzqfpQ0OeRD9P5njT3IsR7Xo5XJvkOTvKnT/zT3dZ
eQHh5Hzho7bv2yky75SfCw6zKEXgGN39uKG0GL/WHc1UJnmzXcaNA0neVYM2
agvR6c+728ytyX71PXu05ppQMSovxToGS5TgwVBwz+gZLsrGQ1VO3SD3E5bD
2kA7DhpDe10MLHiwNljMMDvPwzzVtUIZW8k9/2m/io47F81m1apPyT0xwNlY
WMmF5NP+bk8g55C4o74XU8g5JFhLcCyanEN63Mzi7cj4mVfsqj9dJ/fgHP2E
2WT8kWCnKJvDPJyVe/rK1p2H1GuPVWeUuTD4ILKc95IC/2Bp+uMjVKTLP+jv
X0qDYi1th+0rCjQYX2Olj1Ix9vcI01OEhpSy1xK+6RQo7j37X9JxKtTv79ph
sYyG32UKB5TSKKj/Wr5e+hgV58Z0TBJEaSi0tVRXzKRgTfb1yfgTVAj4H+lL
XE7D3ggvecM3FNjP894g4UCF9Rgj3fs/GvYfWZX98R0FsvvajYOcqOjY5zHY
KUND8ZvgXS3ZFKwaMx0WOUPFk4CYN/2raTj0/vuLDfkUPAwXsPI9RwWfa/vq
M+to0Dexlxn9QAFfnnXj0EUqUgMnZ3wVaLge80A8u4QCk4UbBzZeoeJuicI7
3Z00xPun80syKIgQofhUe1KxflnM0lXbaBCS+CmWVklB+qLEsOnrVFBH/276
uZuGtcuD4ubUUSDX/t9nvSAq9JZdT1DUpSGqP89qoJ2ClIU5JxWjqDAxP39J
3oIGqTX3lUo/USAy8G6RQDgV7LevF7MP0nCQr9P5ZC8FE+FpvyoSqXCKWZjS
f5QGz9/95XtYFDisfN7RkEqFQcFrO6kzNEiHr70i9IuCsOy663J5VNR5OR4U
9KWhd3lQvvsoBcdsdBfrv6YiqL3I/pMbmc+Hy/tGZii4uu+A5FkGFfuNSnNe
3qTB1Fj7oOJcKnLKnWkiH0ldaqzXF4XTMO4dH/ZcggqPSKfTIV1UzL9erG7w
goa5MwszGEsIX5O3NaQ+kfe+lFEwiqehvPHykk5ZKuT2iAhbs6nwMbpTl5lD
w/CsfSYnN1Eh0Wk1du0HFf3RGievMYh+/A5fM9OkQuvmo4L2BWSdDV+tD3XQ
0ONg4KysQoWjlS+Ln5+G+6v4z76voUH3mUF63n4qNimMbJ8vQUPyl+R0czYN
Oh4MsdMWVHg901gTtpbMY9PTnuxfNDATTu6850xFtqt+6U3QMNYR6L93Pjln
L7bpsrajwu061c5+O42c649Q3s+iw+clzXAOqTdz8XrlCVKPG+6x1/+I0LHg
c5ANjdT7VQ5/ZJYtDRslpMM7/6MjPzzPZDiW8JM584vPkwZOxF9xGQU69IQ+
RL8LI+t66//5nSMNhko7fTiydPweY9ZYPCd66hH7GU54b7/dqXV1Bx2yGacd
p95SoZ0r3H3yIRl/a2s7vwYdeT+F3L5Wk/zRB82V2TSMmu+Z9jSkoyKp2reN
ToXCpE6l5xMaDO6/+/hKh46ISrxTaafiSrbH1sNMGuq+HDntaEnH8utfi7OG
qZg1z2iRfAMNO+/u+utznA56Raq1uiANVKNHp53GaJgKiSkUuEhH5uYxmWMT
VAxKB2Rt6iXrotgwMx3peHB9ZFqH9L2lcIL2eX46MlL0frj70kHj7szxk6ZB
zWBtXtE8sq+KLr8+5yYdN+JGfrmS/rCRPPY+j/AV9J43ExBNx3dpV5luRRqW
5/RWbiP8/ipY55sbRsf97KsTcoR3raoEmtUaOrbEblc5m0JH0xnJrlmHadgk
I66waBMdBaW/9jmn03FnrepbJW8a7ITVHKi76fDbWtr6gU7HJsNf/vOcaBhw
iNJrV6IjJNDZ9XYuHac7+y0C79Dg2qDdnqtHh/SkWqXwR/KeC7mmP6NI/0mK
zS02pmPerfqbbp/oWDm2SHbvexq23LZf+J89HfKTUnf82XTEbmFFhTynQZA2
7+CANZ2cQ8wseF10hHWJylQS30tpjS+sJb4n235/+rQYDRVaWRe7iK8WDrcU
hRNf3RdSdruB+Gprz6+dOjkUPKkqjqQ6UsF5cfJnrRQN55RzbA4XUcCN2Grs
6kMFd4NulZQSDVX9ojUVrRTkBtZuv/uAiqmtBs9+mZD1CDn+3T5OwdZYMF8Q
HX2lsLu/uNOQeuid88ZlVBS0TXfua6Oia9Fr790pNNwK0cpR30WFOJ/Q7z4h
GmYHbXLx/kR87EZJLucUFZGRkSZsVRq+Nb+e5TWH3A+t//qXPaRCMLc2o+E8
DdbumTr88nRoXRJsPFpGfPBNdpBEGg2VInG8BfvoOOHwzVrvLxWtG6Oe6pD+
vKveUnbIlQ7lLLsmGRUaMuaztl0Up6M8uCM/+gEdxjnwib1Aw66gGqn9anSs
UD8ilFRIR1JIRPHJ12R9THe9K0eJvp/IblYi943ZxvKzxMl+tLy/8G0d4TN6
/p3JlUSXjKXjmltfEx/uf2r20Z740Oinbb9X0JA7Z2JgpoCC1mE32xQ30seO
F5d0r6fhebr09MFqCoqZ4epit6gwT57Sua5FA/uPcUjJAAULc7266SnEb/SK
L120J3qlX5QRFKRCpCzWbVspFcXuH8TWB5O67KqeiJSnwnP7dHT3CBXKzn0C
woU0vHYqjhQyoaKhu+eYNqmrOm/kouc3Gs4aaF9o96Pipc6VF5XmNJgv+V0w
RPh4+vSSSEoGFQtk528eC6Hh9HSmWeFOOlJVGv/weqi4+GnxR7VKGpzOyvrx
bOnY3HLU8DDxQZ/aA7sjZ5O++ts5o+5Ph/8Ruv89Mq5Lha7YG1Kn6Stnvp1+
Tse5ljJvNeLrd21/96sfoKOIp1egXkdHy3Yref0Msi8YblYOI774hb+7/Yw4
Da/ci0Jc31OQWnbs20UXKrbbB1oulaNhYdPGRbLlFFjpGM4X8ie+khXzIFSd
Bu7qzwkruijIkfji8JX4onBhopKHDQ3Z3ltmRv6QetGuLyz4QHx9E83KwJ+G
M3YJn1UlqfggaRIy2E/FOn6X1ecyybxVH4f76VLht2mof5jU1eNVRKd+Hw2N
Ylfk914gfPZtvaqkR4P9EcGF/y2mY4l4c/3yZCrMbDN9Na/SYDGbUrV/C+n7
LXIyIU1kn3qY6RFcQMMfAcUOjikdyUtWjqvNp8FvoJKZ8JvoI/DotTwPOqqj
Ok4X65B9/k7m3tlSdHSc0d1+MYEOp3kb5raS+Q4rsaZ3atNxcE5SVXcJHVYC
zeEbaUQvoZZhhafpmJESMW0YIT4/+96TfKLPsIrr58PJeWn/xpGdv8g6xmYp
twZmUVBeGelwi/QZn8A3ldWriA9EKuz8TaXg8TvfqAPuZN1O7EJ14o+W1z5T
2hooUC0v2h4ZQsVW+eaJPwY08FPC2DVcCj56vU2feUWF3WCOJMeZBlmDp2Gu
C6i43mJasqCOiqPrO5J8Imn4+TykW3sbFY/CTtUq/6HCstvi8aJyGq7I7eA0
2xI/2lyj/pWch+5kJzcJ8NGRQgmtyb5DziW5Cz68OkGDyB3Lji5JOs4MpcY7
FFCRmLatcSCOhhJr+wJTTTqal6r1BBDdn8/MZcq20fBhurJiiQOpi8PQ3Jfy
NDzuV479uZCOuhu6x9uD6IgcT+UEkH7qjWzkXdhKh8rYkXUeWXQMTq/8QEmi
gX6ub6vZITpmyWqKp7fR8T84Fdtq
        "]], {}}, {
      GrayLevel[0], 
      PointSize[0.03], {{
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.6256168176960502, 1.3162356826228445`}]}, {
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.6254032925070462, 1.3170035555140274`}]}, {
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.5398365354949338, 1.8742949380000997`}]}, {
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.6018756808136472, 1.2829102234226146`}]}, {
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.6636407234163055, 1.1964465108701883`}]}, {
        RGBColor[0.471412, 0.108766, 0.527016], 
        PointBox[{0.5119927118703519, 1.6994567646172045`}]}, {
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointBox[{0.6193856512487095, 1.339838166159049}]}, {
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointBox[{0.5672042411326582, 1.428215475654272}]}, {
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointBox[{0.506756626620684, 1.7237310544292748`}]}, {
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointBox[{0.5171257681427459, 1.7758684608623196`}]}, {
        RGBColor[
        0.30244114285714285`, 0.13298085714285715`, 0.6794237142857142], 
        PointBox[{0.5880302857225156, 1.4176342179343213`}]}, {
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointBox[{0.517371814798862, 1.7689431534120663`}]}, {
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointBox[{0.5264516916464945, 1.7488876080153544`}]}, {
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointBox[{0.5215763066525619, 2.0322951205071735`}]}, {
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointBox[{0.5013165847520514, 2.0806320728551277`}]}, {
        RGBColor[0.24882857142857143`, 0.264202, 0.7825611428571428], 
        PointBox[{0.5378175493254662, 1.8381369222337465`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.6456644612483396, 1.0823806697824907`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.6016826203612534, 0.9531929459253169}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.5278832120985044, 1.3816046299089364`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.5453387814898204, 1.2424092488462377`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.5272716413426793, 1.2839810400271368`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.5098587301378381, 1.5118192513099067`}]}, {
        RGBColor[
        0.25352657142857143`, 0.4149942857142857, 0.8102747142857143], 
        PointBox[{0.5071903819322304, 1.4149188725432515`}]}, {
        RGBColor[0.2888631428571429, 0.5431845714285714, 0.7666072857142857], 
        PointBox[{0.7239145719054749, 0.7820999944609054}]}, {
        RGBColor[0.2888631428571429, 0.5431845714285714, 0.7666072857142857], 
        PointBox[{0.6278430397157454, 0.8218929216843003}]}, {
        RGBColor[0.3448911428571429, 0.6357064285714286, 0.6725417142857143], 
        PointBox[{0.6143030723066414, 1.0830439644658378`}]}, {
        RGBColor[0.3448911428571429, 0.6357064285714286, 0.6725417142857143], 
        PointBox[{0.8062113310635175, 0.8199626961104812}]}, {
        GrayLevel[0.5], 
        PointBox[{0.5913500194882323, 1.3139761255458458`}]}, {
        GrayLevel[0.5], 
        PointBox[{0.5704082742094568, 1.4474849820606104`}]}, {
        RGBColor[0.513417, 0.72992, 0.440682], 
        PointBox[{0.6990668422776487, 0.8189623596881704}]}, {
        RGBColor[0.513417, 0.72992, 0.440682], 
        PointBox[{0.8581245307719652, 0.7236625211596195}]}, {
        RGBColor[0.513417, 0.72992, 0.440682], 
        PointBox[{0.7584839814032474, 0.814231761506343}]}, {
        RGBColor[0.513417, 0.72992, 0.440682], 
        PointBox[{0.7590947478562219, 0.8156084135208643}]}, {
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
        PointBox[{0.5862257037163925, 1.488573703285649}]}, {
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
        PointBox[{0.6270090468132886, 1.3959693743362616`}]}, {
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
        PointBox[{0.690925756602125, 1.1723946209426406`}]}, {
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
        PointBox[{0.6846222929284531, 1.1896653473195091`}]}, {
        RGBColor[0.6215634285714287, 0.743557, 0.3500992857142857], 
        PointBox[{0.604695292765477, 1.5421823538565362`}]}, {
        RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
        PointBox[{0.7912444941970566, 1.1506210436406887`}]}, {
        RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
        PointBox[{0.7597435571275726, 1.0990281108152133`}]}, {
        RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
        PointBox[{0.6428168458772922, 1.482670760239363}]}, {
        RGBColor[0.7306125714285715, 0.7364672857142857, 0.2882132857142857], 
        PointBox[{0.7082294537004035, 1.1279850366340027`}]}, {
        RGBColor[
        0.8241045714285714, 0.6995635714285714, 0.25042971428571426`], 
        PointBox[{0.5893452959269976, 0.9229870408331715}]}, {
        RGBColor[
        0.8241045714285714, 0.6995635714285714, 0.25042971428571426`], 
        PointBox[{0.6241665424028686, 0.8674128138056578}]}, {
        RGBColor[
        0.8849417142857142, 0.6205167142857143, 0.22512285714285715`], 
        PointBox[{1.2338175694123301`, 0.4155699418028775}]}, {
        RGBColor[
        0.8849417142857142, 0.6205167142857143, 0.22512285714285715`], 
        PointBox[{0.8900632278453059, 0.6432784417274489}]}, {
        RGBColor[
        0.8849417142857142, 0.6205167142857143, 0.22512285714285715`], 
        PointBox[{0.9399217402969386, 0.5433240602443489}]}, {
        RGBColor[0.9023275714285715, 0.49078171428571427`, 0.199022], 
        PointBox[{0.7082889660873991, 0.792257334559499}]}, {
        RGBColor[0.9023275714285715, 0.49078171428571427`, 0.199022], 
        PointBox[{0.7291743945120012, 0.6822453874593447}]}, {
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointBox[{0.598754638729384, 1.5424352705028859`}]}, {
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointBox[{0.5788111703055505, 1.7447575900369046`}]}, {
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointBox[{0.6529640777521031, 1.4308615275887997`}]}, {
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointBox[{0.6351492581629832, 1.5997017881215383`}]}, {
        RGBColor[0.8816421428571428, 0.3161731428571429, 0.1649857142857143], 
        PointBox[{0.6585693832857955, 1.585699913037399}]}, {
        RGBColor[0.857359, 0.131106, 0.132128], 
        PointBox[{0.6336186556014429, 1.6602605637838643`}]}, {
        RGBColor[0.857359, 0.131106, 0.132128], 
        PointBox[{0.588354648402883, 1.8473156936906563`}]}, {
        RGBColor[0.857359, 0.131106, 0.132128], 
        PointBox[{0.5317612589643664, 1.8880152054570585`}]}, {
        RGBColor[0.857359, 0.131106, 0.132128], 
        PointBox[{0.5862863284537787, 1.648486336879314}]}, {
        RGBColor[0.857359, 0.131106, 0.132128], 
        PointBox[{0.6856767966272653, 1.3769273642607254`}]}}, 
      PointSize[0.02], 
      GrayLevel[0.5], 
      PointBox[{0, 0}]}}, {
    DisplayFunction -> Identity, DisplayFunction -> Identity, 
     Ticks -> {Automatic, Automatic}, AxesOrigin -> {0., 0.}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLines -> {None, None}, AxesLabel -> {None, None}, 
     FrameLabel -> {{None, None}, {None, None}}, DisplayFunction -> Identity, 
     AspectRatio -> 1, AxesLabel -> {None, None}, DisplayFunction :> Identity,
      Frame -> True, FrameLabel -> {{None, None}, {None, None}}, 
     FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, 
     GridLinesStyle -> Directive[
       GrayLevel[0.5, 0.4]], LabelStyle -> Directive[Bold, 16, 
       GrayLevel[0]], 
     Method -> {
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultPlotStyle" -> Automatic, "GridLinesInFront" -> True}, 
     PlotRange -> {{0, 2.25}, {0, 2.25}}, PlotRangeClipping -> True, 
     PlotRangePadding -> {{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.02], 
        Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[
    FormBox[
     TemplateBox[{
       FormBox[
        StyleBox[
         StyleBox[
          PaneBox[
           GraphicsBox[{
             RasterBox[CompressedData["
1:eJxdV3k0FdzXTgPJLFJEkSQpJbPqqVCkEFFCvRRFpkQDiVBKoUGKyJApSUrI
PM/Tdbnm4Q7ujKKSprfvvr8/v7PWXuc8a52zh2efs9c+ii4+1q5LFi1a1MoT
Pp78t05M+G+U4v/P62nPS365lWGSRbY0iipD1b7GMOH8MmSrvyA5aZVjm54q
/3RgOWjszxdC6sqx9XLql2q+ClyN9KmIv1ABgUdrbef6K1BYnS6h1F2Buv5i
v72OlVA3MN3jyq2EgWCmRkRSJYRV/lXlHK6CFfXSpsG/Vaixzj7CcK+CbYDJ
xOPd1TBotLyzcUUNDiS9umCqWw0rl6Y2BZkaHEmg/z4VVwPGHMnYdnENvgpy
Mi/F1uC0V9DFZwq1eCUzYMPvXoPEdyI3WwRqcXGfBKMnpxZeuwZdSrprsMd+
h6N8aC3CpbNPCu2sw3bnoYvndWpBW2Sr67dQi3j2rm7jyjp8uTUcuia5Fndy
rko2+9Yhp5JodONgPYpzR2LbltRhq1XStBy7DmUPz38s6alHYPfoiyCPOhC/
V7f4Otejw/Vf9VmHBuz6OvZGvacOV1JoLxuH6jGuH5emxmjAojUTFWO69Vh7
UCBE1roBn0XUVp31bUT9bnJ7zIt61M6onfRpa8ASanVU8s9G3HahDGNZA9zi
LbQb9jdCutj2b39EE8wiqbxMNEBoj5/4mvJGbIriXhIXa4ZwHm0hjdiAAvoT
rtfOJhicuskyS2gGgTApYKPfiGPRpU11r5twWFPGKXxDCx59o69amtqIn1pj
aTLKzTjF/6an4k0L7GSZG4v4m5AyuijYM6kZvsP7D8zrtmI1WFpuXk0wjlA+
USvVgrD8wTKNulaMnmEbyfQ1gbXFdOeq6BbEhXlruB9uQ+odjnWLQTNiei+I
XljWimy7pRnp/W1wecN1vpbWDM2gWHZ1cCtK1RJXj/7TDhXilK/a8hYMKhU2
SM23ouNfjWhpbjtY89MhI94tuN7Wn+Lu3YYxYiOfZUAH8uQ+xdwntUDR72dg
FaMNn7IcLt/52wGfvZ+Td+9qRdMaBbuVp9uxOGiWU3u3E5qus3kz6a24ULtv
x/mBdkhZRp7+tbIL83fnylME2yDu7ipcadkBlQ3yfVovuvAx/0ublW8bisXv
MiVaOqD//b2pt2o3rvd+HeIbaMPJj3l1bns7Yd5uWpn9vht7Fr6x3u9ux9/T
hOTyj53It/z0zFeBgMXy37+fyWhHhsDXq+I7eHr1DWyizxDQuG+BX1qoA2Zv
ZY65vupCzYZbIrk5BNxx+yHddLEDM3aGGmWK3WgTITQ3TRNw+N5P5SuDHXj8
76kVYond6P0uG0bT7MHxLd66a3d0wi5aKlT7TzdGDO3Xb3ftgXM7xey/uIVF
6T+3bidgMuRp1fWnPfC8YOvoRu2EF6lau9aZgKl6kmNraw+uCLV6Cxl2oTsp
0ffYYwK+CUj9kv7dg7DXu24WPO7C9rMBr5kNBPwxt05w2UZEtHnBY9upLjzc
YsUInCeA/8ED3bf/EPGMuyHrp3E3vsypKYqq9kC0r4v06xER6feefkxJ7sax
smWOafY9WLVaxN+0kYg3W4Tajee7UXSTHK91rwfrHM0ln3wnYtS1esZ/EwEy
ZuU9zRU92JR6t4CyuRcU7R9Xmm0IuCoeL+ww04Ptk80W2xx7wVy2k082lICh
Ad+DM+uI+F/ZiunFFMkzyjOPAMMU87CbR4nY62l8r7mmF3OZWSurBwlIclOp
lAonwqwgbLPUl158DyAnSSzrwb9b+RayPxBx9GtN8z8b+/DbRFbl7I4enP42
omnIIOKk3l/XN8f7sHjVsbfFTj2oqSj26pLphcv13Ut/3u2DACNaTzCqB4oR
D3OczXrhUROUfqCiD8LFzbUOxTxezT1pXwN7cWlp2d7HM32QvM1nnk/twaTk
QYU7eb0IMl0Yn1hPgoydYd8iMSJMhhXt5cZ7EXFfJ1jdhgR5lQAnG0MistJ+
P84X68N9gr/ctVskKM3nMzLPEbHcfaBr374+xEkVljaWkKDaxPJZeEyE+/b3
giS/PiSfmD0uySFha7zSj0M1RLR/v298PqMPWUka86fW9kPTzTEseYoI9epz
Ib9Ifcgne8W9tuiHnk680OfVvYi5vb8sRoCEYuU8zYXQfuzmJ8TtN+nFpyPy
3xT1Sag+zyEYF/bDqF9Q4cnFXlhJL2gUeZDQkqfq85DeD9Mso2xmci/ejxI9
TJNIIHx2ExmXGcCRy8HbDdp6IZnxJnOkk4RBrczXaocGYH2gpPT+fC/8L9wh
e/8lgXyVZnbl+gBOrJrdP6HUB5LmGbnFO/rBrlBk1ecP4BRDrWOHZR90fu62
e+LSj9lF/9wWpwzgTPFZ24igPjyrXf1QNa4fP41fKDutHMT52y/G+7P78OPO
l/byxn4svjta98pkEN52g+c29/XBwaqL3/J7P1Z0yjrPXxnEJRXJ2aBFJFTI
vNpHVR3ASgn7v/tzB3Ft3jywS50EhYnw6wEnB7DW9mly7OggbjTdWqJoT0JI
1qmS5fcHoJxAMhwVHcJ1k5JTvS9JWBkj5r6idwC3zxwumLEYQmADq/TWDAnZ
ATWywrKDYG2tV+aLHcJVI1lpPf1+GDpd7BBxHoTZgn7Cyu4hXK4z9+WE96PL
WOmGWM4gcusKRFTEhuG/L7g9qasfLuq9GhKfBiEcvSlMz3IYfjX5KpZrBjC/
MoIiqTME7+Mv5g/FDsMX5Jt8Zwdw75fWY6ngIRAUpS84dQ/Du0pirJDH6zoa
3XhVwxA0p+5N+IiNwHO3kZ7bjwEUtsXPywgN43Hx4mNhliPwqPB/vNp4EAff
H8xZYz2Mb6HXWuJiR+BumDXTFjOIkYQFe7mEYRw3/7wru3sE58oGzIKHBuFz
85WQPHkYpdLn3pWKjcJVn9dAKA9hifvJSoVNI5Alj23ssBzFmY8Gi6jeQ3hq
JeSz3nsE13OPJY7HjsJZ19MhrnQIW/Qq1isVjWDcv110tnsUp4qTiw8sHUbV
Oi/iht8jAPaHLxEfg6N2t8QPi2FYCyhEbDQaRZpg6XdpqzE4fFjk9ZrnH2Om
S3tT1CgW92l4qj4Yg/1OzRanyWEE9ocwVXtGcfZFFtmAMIbj789sENcYgWjV
9gS11WNoOi9ve0R8HLY7ntyouzaC9EzKIfXTY1DdGdd62mocNgVNQ/4NI9CJ
fvR7a9YYov6s2OP3YBzWGgtam3hxt/sb5WtMj2Gq+eb7CMI4rPI3PxiyH8Vp
x6+nd2iN48ijBZWn4hOw2OrAvZcxii9GmRI7g8bx1tHn+SurCRzOu39gz6dR
RG6xq9eqG4fEJoZYxYMJHNpSlfZZfwxyKwUCdAQn4DfrGNFFmIBp7qff6RFj
ePuzREWPd54z5n7ddzkZBzYrnrDtHoMR9fyg/tMJyBllFl9TJcM4x7pQQHYc
A61rogzHefZyyJ/DTMnYvylCtOzsOIpP0JNfSJIRLLJ2y/3zZOzLKnL3fDuO
0I7Ky+t0yMj3O+765A4Z2MhsUPg5jkN74y1T7cmYGHiU8iKHjN0Zq9f3GE9A
6oO3qmIwGeK7u4ayW8gw3HAoKDx2AuObDvKlp5KxN11Q6h2LDL30oH7t4Qlk
P183rNRAhq+AiUXZcgqeP+hf7c/z46LYwvuXTDLSPUPv1KtSIGvlc6BTl6cv
nHBPWYgCYk95XYcpBQliy/1VnMhY9j3nbOY2Cpbofv9NOk/B6u7UtJAwMro9
bu5WsaZAK0lTd+IOBTqXpgu2FZJxKVecE3yDgiCr10atbymwkTGoGaORsYqT
Ek/KpaBuqbJVYT8FF8tvd9+XoqBss4bR1gEKlpcmOSb/oSDmdO+4oQkFTu5V
nyKWUGHpJe0eqUxF3pL1M5wACvheHUka1aAiXjEm4KI5Fa3Znn8SsijIYI2a
ajlSMUbiD3Pwo4JpXipsxtNrqur57d4dKpSjQmJMEqhY+nnZ2gUBKrjnfqXR
PlDhsWchUaOGCqU46y3ZelTEZkdZGFKoeDfnm72GSQX0Ugzs3KnQZK759UiE
hoUsduESURqcRrlmyxKp6Fd5lc3RpwEOLjXTWjQEhurZf2ij4pqb3rH9bjTc
FhvpGHCg4ZnyrfNnflEhn9W8KPERDR31NkO1YTQUtfRckVSnoYZu92a2ioaV
Vzvor1/R0OupEFnrSMPZjQx7My4NJ9VN5p4QaPgsfiHeN5oGAdcA/jSZSaSR
K/8N+U6DaFFJ5jre+dcZSwsXjCbBitMR8lCYhLr90qKuGRosJh+ftvKdxLb/
Gi2TSZj9sWoIXjeJuQ0bhHOSJhHwZ5PyHs9JuKUl96pbTSL+zPuPf1smUfEu
dbvq40mEm3CoI6GT0Hu5z/X4t0ksdluzW7JsEqlsnbmod5MYoRIk3irSYSb7
yOw3eRJV0eF8BtRJhCj9U8VvQUds1wo7hgAdozsI4mxJOpRcPnmcCqSjPyzc
hbCNjh+kteufGdHRlHZDpjiLDnnd395ltnSsCnTXOOhPhwdFpEGkl46zXP+g
jOt0aCkU75nPoENEMdnX9S8duSnTkTEv6bCuW2yRSaKj4B91+cotDMzZuMVd
baPDx83S6Rg/A8dSy1ulTjCgt3wi1WWWjugVSZ5LdBlYmDh02TOCgZCK428O
r2YgN58V9P4cA/97RgUMNPkSSnXAQIu19j3nZwzgtHu33BgDwhvNmta7MUCf
v5ko3soA9cVC0CVBJo4N1RJXRDOw5HnXq+ofDNwej1Rt12YiMdpg4mshA+sh
V+qtxsRmBRmSkgsTlH2F3PFhBvbQzrXIOzDR6ZR1MzCGCdX5LQstfEw4RH4Y
6LjHhG+y9jZiGRPeubxEqzJxbQsfM6iCCamxhuHNTCaKTslLJFsyEd99ZF5t
momStccib65k4bdkvHzkZSY+XEpcNizPgoMjbecQWDBqFlW7mMwE6p9rX+Vh
3qWVN3ZmQVrZc9s0z067ZLLrKh4+osrmfxvGAiu0VdN9kAk7lxdPPvDwAVHP
z2syWCgbU9Glf2OC+i6l0ZqH8XVmKKKRhWiDCENnnn0vvrRvn3lYb/hi/ScG
C6efUjC2nYUFq/SNsUwWdtR8zTu5nA3Nr3uM7S1YCE99abtVkI3NWVfiGzez
sfRokinpAguinzNutauxoXT/Z8h2czb63/w4fPQuC4ngFdbDbMj5Bbs/92Qj
Z8Xxo51ZLGyMzaYLeLMhdWKRDX8MG0HnPtiaNbBQMJ4jnRXLhsie8F0X37Jx
pEHiZCOFhV3bck2M37HBr8yvMkpgY72iz6l9f1loDn4dQCWy8VfwrtjBOTbm
gjtcKteyYdOZlxn6lY2FT0I/3q3koHF48zl9AzbG1+aTFFZxMEuKoa7V5uCp
buSFouNseHi+XVapywGnXKIj0o4Dj7hJnx0BbHwrL9B2sOeAlhZXNHeFg12z
+/zfPGIjVOi9649ADkYjZVKcEjgQtUi5urmADWGHwidPkzggeSXeaSnjgJL7
+3pmJxtPcz80aldx0GUj77dzlIMPAidvKnJ5fP0s+tY7wUGTfqrDiz8c3D5b
cit5OQf5ZiUb/fi4qFm3wURwHRe8T23UGhUO9BM+2opv4OLjsqxt/nu52KLg
F/PEiBcfrx3LN+biHVd19YQzF38Cux9JOHNgpVdedNiNi9ye13yHwrkgDKg/
jb7BwUhkBZ0TycXLkm3cDxlcpGtFPRfk+X1uoFL67isukpLf9a1r4iLgITPl
VikHcyrVJpvauXgSrlUVxeTi4IxxBt8ABzcu1wQ0TnER416S/W35FGTN03OC
v3Ig2FSbeUZ0CpGWBg//UZvCVPbfvB8SXMRJ15P4tk8hVLsysN18ClVLnd4F
aHCxzrVhWerRKVyV23tWx2sKD5zLimYP8/zm0bbn0hQu8tUfSYuZwpkqmTIv
Dy50lja7jsZNwYNpoitcMAVtuYAqNi+eWpuWJ4HFvH2dLeuv9Exh+VVinWsm
F4dftjauHpyCY6H5CurcFIb7NJopdVwMzrV9K/4xBduEri+HpaaRtyO63YnM
xZn9HRtt5aZhEXJ0rER7GiExnO6hP1x8ethp+2XXNA669jUpHZ+GNfdgn63c
FAIpXbcenprGXvPjBdFXp6FsmjnYozeF/wOCAZcf
              "], {{
                Rational[-15, 2], -180}, {
                Rational[15, 2], 180}}], {Antialiasing -> False, 
              AbsoluteThickness[0.1], 
              Directive[
               Opacity[0.3], 
               GrayLevel[0]], 
              LineBox[
               NCache[{{
                  Rational[15, 2], -180}, {
                  Rational[-15, 2], -180}, {
                  Rational[-15, 2], 180}, {
                  Rational[15, 2], 180}, {
                  Rational[15, 2], -180}}, {{
                 7.5, -180}, {-7.5, -180}, {-7.5, 180}, {7.5, 180}, {
                 7.5, -180}}]]}, {
              CapForm[None], {}}, 
             StyleBox[{Antialiasing -> False, 
               StyleBox[
                LineBox[{{7.5, -180.}, {7.5, 180.}}], 
                Directive[
                 AbsoluteThickness[0.2], 
                 Opacity[0.3], 
                 GrayLevel[0]], StripOnInput -> False], 
               StyleBox[
                StyleBox[{{
                   StyleBox[
                    LineBox[{{{7.5, -180.}, 
                    Offset[{4., 0}, {7.5, -180.}]}, {{
                    7.5, -106.22950819672131`}, 
                    Offset[{4., 0}, {7.5, -106.22950819672131`}]}, {{
                    7.5, -32.459016393442624`}, 
                    Offset[{4., 0}, {7.5, -32.459016393442624`}]}, {{7.5, 
                    41.311475409836056`}, 
                    Offset[{4., 0}, {7.5, 41.311475409836056`}]}, {{7.5, 
                    115.08196721311474`}, 
                    Offset[{4., 0}, {7.5, 115.08196721311474`}]}}], 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4]], StripOnInput -> False], 
                   StyleBox[
                    LineBox[{{{7.5, -161.55737704918033`}, 
                    Offset[{2.5, 0.}, {7.5, -161.55737704918033`}]}, {{
                    7.5, -143.11475409836066`}, 
                    Offset[{2.5, 0.}, {7.5, -143.11475409836066`}]}, {{
                    7.5, -124.67213114754098`}, 
                    Offset[{2.5, 0.}, {7.5, -124.67213114754098`}]}, {{
                    7.5, -87.78688524590164}, 
                    Offset[{2.5, 0.}, {7.5, -87.78688524590164}]}, {{
                    7.5, -69.34426229508198}, 
                    Offset[{2.5, 0.}, {7.5, -69.34426229508198}]}, {{
                    7.5, -50.901639344262314`}, 
                    Offset[{2.5, 0.}, {7.5, -50.901639344262314`}]}, {{
                    7.5, -14.016393442622956`}, 
                    Offset[{2.5, 0.}, {7.5, -14.016393442622956`}]}, {{7.5, 
                    4.426229508196714}, 
                    Offset[{2.5, 0.}, {7.5, 4.426229508196714}]}, {{7.5, 
                    22.868852459016413`}, 
                    Offset[{2.5, 0.}, {7.5, 22.868852459016413`}]}, {{7.5, 
                    59.754098360655725`}, 
                    Offset[{2.5, 0.}, {7.5, 59.754098360655725`}]}, {{7.5, 
                    78.19672131147537}, 
                    Offset[{2.5, 0.}, {7.5, 78.19672131147537}]}, {{7.5, 
                    96.63934426229507}, 
                    Offset[{2.5, 0.}, {7.5, 96.63934426229507}]}, {{7.5, 
                    133.52459016393442`}, 
                    Offset[{2.5, 0.}, {7.5, 133.52459016393442`}]}, {{7.5, 
                    151.9672131147541}, 
                    Offset[{2.5, 0.}, {7.5, 151.9672131147541}]}, {{7.5, 
                    170.40983606557376`}, 
                    Offset[{2.5, 0.}, {7.5, 170.40983606557376`}]}}], 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4], 
                    Opacity[0.3]], StripOnInput -> False]}, 
                  StyleBox[
                   StyleBox[{{
                    StyleBox[{
                    InsetBox[
                    FormBox["0", TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -180.}], {-1, 0.}, Automatic, {1, 
                    0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.2\"", 0.2, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 1}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -106.22950819672131`}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.4\"", 0.4, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 1}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, -32.459016393442624`}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.6\"", 0.6, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 1}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, 41.311475409836056`}], {-1, 0.}, 
                    Automatic, {1, 0}], 
                    InsetBox[
                    FormBox[
                    TagBox[
                    InterpretationBox["\"0.8\"", 0.8, AutoDelete -> True], 
                    NumberForm[#, {
                    DirectedInfinity[1], 1}]& ], TraditionalForm], 
                    Offset[{7., 0.}, {7.5, 115.08196721311474`}], {-1, 0.}, 
                    Automatic, {1, 0}]}, 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4]], {
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]], 
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]]}, StripOnInput -> False], 
                    
                    StyleBox[{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \
{}, {}, {}}, 
                    Directive[
                    AbsoluteThickness[0.2], 
                    GrayLevel[0.4], 
                    Opacity[0.3]], {
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]], 
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]]}, StripOnInput -> False]}, {}}, {
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]], 
                    Directive[
                    Opacity[1], 
                    Directive[Bold, 16, 
                    GrayLevel[0]]]}, StripOnInput -> False], "GraphicsLabel", 
                   StripOnInput -> False]}, "GraphicsTicks", StripOnInput -> 
                 False], {
                 Directive[
                  AbsoluteThickness[0.2], 
                  GrayLevel[0.4]], 
                 Directive[
                  AbsoluteThickness[0.2], 
                  GrayLevel[0.4], 
                  Opacity[0.3]]}, StripOnInput -> False]}, "GraphicsAxes", 
              StripOnInput -> False]}, PlotRangePadding -> Scaled[0.02], 
            PlotRange -> All, Frame -> True, 
            FrameTicks -> {{False, False}, {True, False}}, FrameStyle -> 
            Opacity[0], FrameTicksStyle -> Opacity[0], 
            ImageSize -> {Automatic, 360}, BaseStyle -> {}], Alignment -> 
           Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}},
            ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> 
          False], {
          Directive[Bold, 16, 
           GrayLevel[0]], FontFamily -> "Arial"}, Background -> Automatic, 
         StripOnInput -> False], TraditionalForm]}, "BarLegend", 
      DisplayFunction -> (#& ), 
      InterpretationFunction :> (RowBox[{"BarLegend", "[", 
         RowBox[{
           RowBox[{"{", 
             RowBox[{
               RowBox[{
                 RowBox[{"Blend", "[", 
                   RowBox[{"\"GrayTones\"", ",", "#1"}], "]"}], "&"}], ",", 
               RowBox[{"{", 
                 
                 RowBox[{
                  "0.00039237423138116555`", ",", "0.9761676139272856`"}], 
                 "}"}]}], "}"}], ",", 
           RowBox[{"LabelStyle", "\[Rule]", 
             RowBox[{"Directive", "[", 
               RowBox[{"Bold", ",", "16", ",", 
                 InterpretationBox[
                  ButtonBox[
                   TooltipBox[
                    GraphicsBox[{{
                    GrayLevel[0], 
                    RectangleBox[{0, 0}]}, {
                    GrayLevel[0], 
                    RectangleBox[{1, -1}]}, {
                    GrayLevel[0], 
                    RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> 
                    "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, 
                    FrameStyle -> GrayLevel[0.], FrameTicks -> None, 
                    PlotRangePadding -> None, ImageSize -> 
                    Dynamic[{
                    Automatic, 
                    1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
                    Magnification])}]], 
                    StyleBox[
                    RowBox[{"GrayLevel", "[", "0", "]"}], NumberMarks -> 
                    False]], Appearance -> None, BaseStyle -> {}, 
                   BaselinePosition -> Baseline, DefaultBaseStyle -> {}, 
                   ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, 
                    If[
                    Not[
                    AbsoluteCurrentValue["Deployed"]], 
                    SelectionMove[Typeset`box$, All, Expression]; 
                    FrontEnd`Private`$ColorSelectorInitialAlpha = 1; 
                    FrontEnd`Private`$ColorSelectorInitialColor = 
                    GrayLevel[0]; 
                    FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; 
                    MathLink`CallFrontEnd[
                    FrontEnd`AttachCell[Typeset`box$, 
                    FrontEndResource["GrayLevelColorValueSelector"], {
                    0, {Left, Bottom}}, {Left, Top}, 
                    "ClosingActions" -> {
                    "SelectionDeparture", "ParentChanged", 
                    "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> 
                   Automatic, Method -> "Preemptive"], 
                  GrayLevel[0], Editable -> False, Selectable -> False]}], 
               "]"}]}], ",", 
           RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}], ",", 
           RowBox[{"LegendMarkerSize", "\[Rule]", "360"}], ",", 
           RowBox[{"Charting`TickAnnotations", "\[Rule]", "None"}], ",", 
           RowBox[{"ScalingFunctions", "\[Rule]", 
             RowBox[{"{", 
               RowBox[{"Identity", ",", "Identity"}], "}"}]}], ",", 
           RowBox[{"Charting`TickSide", "\[Rule]", "Right"}], ",", 
           RowBox[{"ColorFunctionScaling", "\[Rule]", "True"}]}], "]"}]& )], 
     TraditionalForm], TraditionalForm]},
  "Legended",
  DisplayFunction->(GridBox[{{
      TagBox[
       ItemBox[
        PaneBox[
         TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, 
         BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], 
       "SkipImageSizeLevel"], 
      ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, 
    GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, 
    AutoDelete -> False, GridBoxItemSize -> Automatic, 
    BaselinePosition -> {1, 1}]& ),
  Editable->True,
  InterpretationFunction->(RowBox[{"Legended", "[", 
     RowBox[{#, ",", 
       RowBox[{"Placed", "[", 
         RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
 CellChangeTimes->{{3.809250929088769*^9, 3.8092509361983223`*^9}, 
   3.80925098813792*^9, {3.809251378599555*^9, 3.8092514067027817`*^9}, 
   3.8092515990681477`*^9, 3.809252297339347*^9, 3.8092557178196263`*^9, 
   3.8092558011764917`*^9, {3.80944543600463*^9, 3.809445461332299*^9}, 
   3.809445506029215*^9, {3.809502078998916*^9, 3.809502167917428*^9}, 
   3.809591864732112*^9, {3.809591899137119*^9, 3.809591922480733*^9}, 
   3.809592023169503*^9, {3.8095920968903856`*^9, 3.80959210507849*^9}, {
   3.8095921515751753`*^9, 3.8095921644527297`*^9}, {3.809592252054475*^9, 
   3.8095923577738547`*^9}, {3.8095924123241568`*^9, 3.809592436045247*^9}, {
   3.8095927873604193`*^9, 3.809592809380743*^9}, {3.809593035865924*^9, 
   3.8095930604645395`*^9}, 3.8095931140673285`*^9, 3.809593511812896*^9, 
   3.8095940817420125`*^9},
 CellLabel->
  "Out[402]=",ExpressionUUID->"9d7bfc9c-cb99-44c1-8796-6d6b16f01056"]
}, Open  ]]
},
WindowSize->{1920, 997},
WindowMargins->{{-8, Automatic}, {Automatic, -8}},
Magnification:>1.8 Inherited,
FrontEndVersion->"12.0 for Microsoft Windows (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 2624, 69, 221, "Input",ExpressionUUID->"899327f2-1723-4931-90a1-8a258c71e76a"],
Cell[CellGroupData[{
Cell[3207, 93, 1039, 25, 117, "Input",ExpressionUUID->"8c933468-b6be-4d3e-b87e-4272fbea92e6"],
Cell[4249, 120, 5237, 104, 416, "Output",ExpressionUUID->"fda08c05-72ac-46c7-88ed-ab8555e048a8"]
}, Open  ]],
Cell[9501, 227, 968, 25, 187, "Input",ExpressionUUID->"15c2221c-3352-468d-908c-112f1e569edf"],
Cell[CellGroupData[{
Cell[10494, 256, 479, 13, 80, "Input",ExpressionUUID->"58836e45-899d-4a5e-93c4-4c77bb38dbc5"],
Cell[10976, 271, 349, 9, 79, "Output",ExpressionUUID->"c8819249-8a7f-4a27-b1d3-939b6344e4c7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[11362, 285, 922, 23, 98, "Input",ExpressionUUID->"32734641-0080-4d55-94df-7b8fd0068cd3"],
Cell[12287, 310, 4062, 88, 419, "Output",ExpressionUUID->"3881b1da-cb68-4f4f-af04-84d28361e46b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16386, 403, 755, 18, 102, "Input",ExpressionUUID->"c374a3d5-e636-4e6b-9a79-bd43b66be6be"],
Cell[17144, 423, 27328, 508, 699, "Output",ExpressionUUID->"9ccb2a95-8163-4dc7-85d6-27816cb84fdb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[44509, 936, 435, 11, 87, "Input",ExpressionUUID->"1a25b281-3c4c-496a-99ab-4f5413f41b6d"],
Cell[44947, 949, 5572, 112, 430, "Output",ExpressionUUID->"6cfb7085-5eda-4235-9d2d-10521c9d7d4e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[50556, 1066, 206, 3, 50, "Input",ExpressionUUID->"c36802c2-414f-40f1-8ec6-6aac72d278ac"],
Cell[50765, 1071, 167, 2, 58, "Output",ExpressionUUID->"94eac2da-bb92-410c-b673-fdf8757c14da"]
}, Open  ]],
Cell[CellGroupData[{
Cell[50969, 1078, 2201, 58, 195, "Input",ExpressionUUID->"a69376b9-050c-42b9-a8b9-29f88c915011"],
Cell[53173, 1138, 7916, 186, 688, "Output",ExpressionUUID->"8491aedf-fbef-4ede-bf88-11d4a28a0072"]
}, Open  ]],
Cell[61104, 1327, 7965, 188, 1003, "Input",ExpressionUUID->"3e5cbd57-63ff-4a10-9d8c-8d683914775e"],
Cell[CellGroupData[{
Cell[69094, 1519, 2679, 74, 324, "Input",ExpressionUUID->"6b09a13e-0cd6-4a3f-a6e1-3df13bf3ebdf"],
Cell[71776, 1595, 342, 10, 67, "Output",ExpressionUUID->"ac232a0f-2e6a-426e-8667-2e8870abba85"]
}, Open  ]],
Cell[CellGroupData[{
Cell[72155, 1610, 3950, 96, 437, "Input",ExpressionUUID->"198888fe-d494-4203-af74-f8906f0215b3"],
Cell[76108, 1708, 1359, 37, 104, "Output",ExpressionUUID->"9397e9ef-e0d5-443e-bde9-aedbbf9e3d9e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[77504, 1750, 1279, 37, 119, "Input",ExpressionUUID->"319d8f3a-b984-4924-a3e6-e9da550eb180"],
Cell[78786, 1789, 2906, 64, 455, "Output",ExpressionUUID->"8d19f8ef-95ce-486f-93bb-192492bdeebb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[81729, 1858, 4778, 117, 568, "Input",ExpressionUUID->"5c0a848d-1991-420a-adab-ed2ae1ff1e59"],
Cell[86510, 1977, 135406, 2200, 609, "Output",ExpressionUUID->"a076f162-271e-4c16-80a7-c8b16945eac1"]
}, Open  ]],
Cell[221931, 4180, 154, 3, 50, "Input",ExpressionUUID->"59aa324f-c1fd-44f5-acf0-2eb45318bb53"],
Cell[222088, 4185, 5475, 128, 617, "Input",ExpressionUUID->"3e304c2d-b2cd-4fdc-a082-11ae581761b1"],
Cell[227566, 4315, 405, 10, 50, "Input",ExpressionUUID->"94796862-b78d-427e-820a-322b962a8954"],
Cell[227974, 4327, 734, 20, 80, "Input",ExpressionUUID->"8a7ce649-2fca-4afb-b626-459ad20e55fb"],
Cell[228711, 4349, 156, 3, 50, "Input",ExpressionUUID->"d357c987-74ca-4f54-ad8b-293582b0b530"],
Cell[CellGroupData[{
Cell[228892, 4356, 154, 3, 50, "Input",ExpressionUUID->"27c9bc83-4889-4d17-b655-b7bd2c9b3801"],
Cell[229049, 4361, 177, 3, 58, "Output",ExpressionUUID->"37e96ed4-9c68-4469-b232-b4c5f2b27ffe"]
}, Open  ]],
Cell[CellGroupData[{
Cell[229263, 4369, 229, 5, 50, "Input",ExpressionUUID->"27e8de7f-90ae-4ff0-81d5-e4787da2c688"],
Cell[229495, 4376, 817, 26, 104, "Output",ExpressionUUID->"7c65e25f-24df-422c-bba9-ea8dacaf6f5c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[230349, 4407, 166, 4, 50, "Input",ExpressionUUID->"64b5117e-19be-49e0-b74a-a3342b4feba1"],
Cell[230518, 4413, 1195, 33, 134, "Output",ExpressionUUID->"3d673af5-af4f-43f3-87c8-d68df212a318"]
}, Open  ]],
Cell[CellGroupData[{
Cell[231750, 4451, 3342, 88, 354, "Input",ExpressionUUID->"822e9191-3742-4052-8a93-04e4838eb209"],
Cell[235095, 4541, 1335, 26, 500, "Output",ExpressionUUID->"a497c204-fe61-4125-8d77-6af3c9506e58"]
}, Open  ]],
Cell[236445, 4570, 2768, 70, 289, "Input",ExpressionUUID->"c556707d-be97-44da-924b-453e1ed4b465"],
Cell[CellGroupData[{
Cell[239238, 4644, 3291, 83, 390, "Input",ExpressionUUID->"984bdb3d-e10e-4e3c-983e-52d68c199bad"],
Cell[242532, 4729, 2187, 67, 126, "Output",ExpressionUUID->"ea32ddb2-6536-4dc1-a200-25d098b068e8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[244756, 4801, 4989, 124, 432, "Input",ExpressionUUID->"c0a6c4ea-3aae-4544-95fb-b7c9684f745e"],
Cell[249748, 4927, 2419, 47, 710, "Output",ExpressionUUID->"2844f85b-55b7-4aa1-80aa-10adb49c5ff1"]
}, Open  ]],
Cell[CellGroupData[{
Cell[252204, 4979, 4733, 118, 466, "Input",ExpressionUUID->"34175f3e-c416-4966-b5c8-cc9ddaa1c834"],
Cell[256940, 5099, 50737, 909, 699, "Output",ExpressionUUID->"9d7bfc9c-cb99-44c1-8796-6d6b16f01056"]
}, Open  ]]
}
]
*)

